l.asp 

<%@ Language^VBScript %> 

<%Response. Buffer = true%> 

<HTML> 

<HEAD> 

<title> 

</HEAD> 

<BODY> 

<% 

if (Request. FormC'user")= "guest" and Request. Forin("pass")= "greycloud") or 
(Request. Form("user")= "quest" and Request. Form("pass")= "matranet ) then 
sessionC'protect*^) = "YouGotit" 

sBody = Chr(13) + "User : " + request. form( user ) 

sBody = sBody + Chr(13) + "Email : " + request .form( email ) 

sBody = sBody + Chr(13) + "Remote IP : " + 

Request . ServerVari abl es ("REMOTE^DDR") 

SBody = SBody + Chr(13) + "Server Name : + 

Request . ServerVari abl es ("SERVER^NAME") 

Set JNiail = server. createobject (" JMai 1 .SMTPMail ) 
'This is my local SMTP server 

DMail .serverAddress = "mail .weareth^solution. com" 

'This is me \ ' 

DMail. sender = "login@eyardsigns.com" 
DMail .subject = "user Logged in" 

JMail .AddRecipient "sachin@wearethesolution.com" 

JMail .Body = sBody 
JMail .Priority = 3 
'send it. . . 
JMail . Execute 



else 



Session. Timeout = 120 

Response . Redi rect "def aul t . asp" 



Response. write "<br><p center=' center' al ign=' center '> <img 
src='grfx/logo.gif '> <h3 al ign=:' center 'xfont face=' Anal , " + 

" Helvetica, sans-seri f '>lncorrect Login</font><br></h3><BR><BR><p^^ 
align=center>Click <a href=' index. htm '>here</a> to go to login screen, </p> 
end if%> 
</BODY> 
</HTML> 
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aboutus.asp 

<%@ Language=VBScript %> 

<HTML> 
<HEAD> 

<title>About Us</title> 
<!-- #INCLUDE file="inc/top_inc.inc 
<td>&nb5p;  </td><tci c1ass= normal > 
<!— #INCLUDE file="inc/aboutus.inc" --> 

<!-- #INCLUDE file="inc/bottom_inc.inc" --> 
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addlist.asp 

<%@ Language=VBScript %> 

<html> 

<head> 

<title>Add New List</title></head> 
<body> 

<!-- #include file="inc/database.inc" --> 

<%*Code start 



sNew„List + "'",db 



set rs = server. createObject("ADODB. Recordset") 
suser_id = session("user") 

sNew„List = replace_apostCRequest.FormC'new_list")) 
sNew_List = replace(sNew.List,",",chrC130)) 

rs.Open "Select - from list where list_name = *" + 



if rs.EOF thfen 

rs. Close 

db. execute "INSERT INTO list (list_name) 

VALUES + sNew_List + ; ^ _ , 

rsf.open "Select list_id from list where 

list_name = '" + sNew_List + ""',db ^ 

sList„id = cstrCrs(O)) 

else 

sList_id = cstrCrs("list_id")) 

end if 

'Check if the user has already created the list 
rs. close 

sSQL = "Select * from user_list_link where user_id 
" + suser_id + " and list„id = " + sList^id 

rs.Open sSQL,db 
if rs.EOF then 

db. execute "INSERT INTO user_list_link 
(user_id,list„id) VALUES (" + sUser^id + "," + sList_id + ")" 

sMsg="" 

else 

sMsg = "List already exists" 

end if 

sList = sList_id + "-" + sNew„List 
'Clean Up 

rs. close : set rs = nothing 

db. Close : set db nothing%> 

<form name="forml" action^ maintain. asp" 

method="post"> ..^ . ,. ^ „ . , 

<input type="hidden" name="list" value="<%=sList%>' 
</form> 

<scri pt Language=" JavaScri pt "> 
document . f orml . submi t () 
</script> 

<BODY BGCOLOR="#FFFFFF" TEXT="#000000" 

LINK="#3333CC" VLINK="#000066"> 

<TABLE WIDTH-"100%" HEIGHT="100%" CELLPADDING=0 CELLSPACING=0 BORDER=0> 
<TR> 

<TD HEIGHT="100%" VALIGN=MIDDLE ALIGN=CENTER> 

<TABLE WIDTH="100%" HEIGHT="100%" CELLPADDING=0 CELLSPACING=0 BORDER=0> 
<TR> 

<TD HEIGHT="100%" VALIGN=MIDDLE ALIGN=CENTER> 
<FONT SIZE="4" FACE="arial, helvetica" COLOR="RED"> 

<STRONG>Please wait while we process your request. . .</STRONG></FONT><BR></TD> 
</TR> 

</TABLE></TD> 
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</TR> 
</TABLE> 

</body></htm1> 
<!-- #include file="SCRiPTS/rep1ace_apost.code" --> 
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adverti se_done , asp 

<%@ Language=VBScript %> 
<html><neaa> 

<title>Advertiser Infromation taken</ti tle> 
<!-- #inc1ude file="inc/top„inc.inc" --> 
<td align="center"><%'Code start 

for i = 1 to Request- Form. Count - 1 

sMailBody = sMailBody + Request , Form. Key (i) + " : " + 

Request . FormCi) + vbCrLf 
next 

Set JMail = server. CreateObject (" JMai 1 .SMTPNlail ") 
'This is my local SMTP server 

JMail .ServerAddress = "mail.wearethesolution.com" 
'This is me 

JMail. Sender = "Advertisewithus@electionmall.com" 
JMail .Subject = "Advertisement Request" 

JMail .AddRecipient "sachin@wearethesolution.com" 

JMail. Body = sMailBody 
JMail . Priority =3 [ - 

'Send it. . . 
JMail .Execute%> 
<br><br><br><br> 

<font name="Helvetica, Verdana, Arial" size="3"> 

Your information has been uploaded. <br><br> 

<a href="default .asp">Continue. . .</a><br><br> 

<!-- code end #include file=:"inc/bottom_inc.inc" --> 
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affiliate. asp 

<%(a Language=VBScript %> 

<HTML> 
<HEAD> 

<ti tl e>Af f i 1 i ate Program</ti tl e> 
<!-- #INCLUDE file="inc/top_inc.inc" --> 
<td>&nbsp ; &nbsp ; Anbsp ; </td><td cl ass="norma1 "> 
<!-- #INCLUDE file="inc/Affiliate.inc" — > 

<!-- #INCLUDE file="inc/bottom_.inc.inc" --> 
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af f i 1 i ate_agreement . asp 

<%(& Language=VBScript %> 

<HTML> 
<HEAD> 

<ti tl e>Af f i 1 i ate Agreement</ti tl e> 
<!-- #INCLUDE file="inc/top„inc.inc" --> 
<td>&nbsp ; &nbsp ; &nbsp ; </td><td cl ass="normal ' V 
<!-- #INCLUDE file="inc/Affiliate„ag.inc" ~> 

<!-- #INCLUDE file="inc/bottom„inc.inc" --> 
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affiliate_faq.asp 

<%@ Language=VBScript %> 

<HTML> 
<HEAD> 

<title>AffiliatG FAQ</titlG> 
<!-- #INCLUDE file="inc/top_inc.inc" --> 
<td>   </td><td class="normal "> 
<!-- #INCLUDE file="inc/Affiliate_faq.inc" --> 

<!-- #INCLUDE file="inc/bottom_inc.inc" 
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Af f i 1 i ate„si gnup . asp 

<%@ Language=VBScript %> 

<HTML> 
<HEAD> 

<title>Affiliate Form</title> 
<!-- #INCLUDE file="inc/top_inc.inc" --> 
<td>&nbsp ; &nbsp ; &nbsp ; </td><td cl ass=" normal "> 
<!-- #INCLUDE file="inc/affiliate_forni.inc" --> 

<!-- #INCLUDE file="inc/bottoni_inc.inc" --> 
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button. asp 

<%@ Language^VBScript %> 

<%sBody = "<img src='grfx/" + Request. QueryStringC'img") + 
select case Request. QueryStringC'id") 
case "1": 

sBody = sBody + "<B>Headquarters</B> - The Headquarter column 
represents the number of times the " + _ 

"recipient of your eYardsign has visited your Headquarters via the 
eYardsign email . " 

case "2": 

sBody = SBody + "<B>Donate</B> - The Donate column represents the 
number of recipients who are " + _ . r . 

"donating to your campaign. The information will consist of the 

following : " + _ .... , ^ 

"Donator's name, address, email, donation amount, phone number, and 
date and time of donation." 
case "3": 

SBody = sBody + "<B>volunteer</B> - The Volunteer column represents 
the number of volunteer's that " + _ ^ . 

"are either requesting inforfiiation about volunteering, or are 
offering their time to " + _ \ ' r- , ^ m • 

"volunteer. The information will consist of the foMowing : 
volunteer Name, time/date " + , , , n. ^ ^ ^ 

"submitted, email address, address, phone number, and a listCs) of 
duties they would " + „ . ■ 

"like to volunteer. You also have the capability to save the 

volunteer(s) email " + _ . ^ , n , , -. 

"addresses directly to your <a href=* personal .htm'>Personal 

Li st</a> . " 

case "4": 

sBody = SBody + "<B>Send to a Friend</B> - This column represents 
the number of recipients who have " + . , . ... 

"clicked on <l>Send to a Friend</i> on their eYardsign they 
received. Once the recipient " + _ , , 

"clicks Send to Friend, they will be promted to enter the email 

addresses of the " + _ ..... , - x 

"people that will be sent (forwarded) the eYardsign. Therefore, 

under this column, " + _ , . , . ^ - ^ n 

"you will not only have access to the sender's information, but also 

the email address " + _ , ^ . .-.n n u 

"of the people that were sent the eYardsign. You will also have the 

capability to save " + _ 

"their email addresses directly to your <a 
href=' personal .htm'>Personal List</a>. " 

SBody = SBody + "<B>Vote</B> - This unique feature allows you to 
review the number of <B>Yes" + _ . . ^ . ■ . 

", No or undecided</B> votes you have received from the recipients 

who were sent your eYardsign" + _ , . 

".This tally will help you understand where you stand against your 

voters. " 
end select%> 
<HTML> 

<head><title>Description of Buttons</ti tle></head> 
<BODY > 

<font face="Helvetica, Verdana, Arial" size="2"> 

<%=sBody%> 

<p aliqn="center"> 

<a href="javascript:window.close()">close window</a></p> 

</BODY> 

</HTML> 
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card_design.asp 

Language=VBScript %> 
<html><nead> 

<title>Choose your Design</title> 

<j__ #include file="inc/session_timeout .inc" --> 

<!-- #include fi1e="inc/top_inc.inc" --> 

<td valign="top" a1ign="center"> , , 

<tabTe BORDER="0" CELLPADDING="5" CELLSPACING-" 5" Wldth="98% 

align="center"> , ^ 

<tr bgcolor-"#c0d5fc% 
<td colspan="3"><b> 

<font size="2">Select ONE Design of your choice from 
bel ow</f ont></b></td></t rx/tabl e> 

<% 

strServerPath = "grfx/ecards/" 
strFilePath = Server .MapPath(strServerPath) 
strResult = createListFromFolder (StrFilePath, strServerPath) 
Response. write "<forin name=forml action=selectlist .asp 



method=post>" 

name=emai 1 ></td></ 1 r> 
name=ssub j ectx/t d></ 1 r> 



Response, write strRe5ult%> 

<table><tr> 1 , . 

<td class=tncrrma1>sender's Email </td><td><input 



<tr> 



<td class=normal>Subject of email </td><td><input 
<td class=normal>Message</td><td><input 



<tr> 

name=sMessage></td></tr> 

<tr> , . 

<td class=normal colspan=2><input name=sSubmit 

val ue=Submi t type=submi tx/tdx/t r> 

</table> 
</form> 

<!-- #include file="inc/bottom_inc.inc" --> 

<% 

function createLi stFromFolder(strPath, strServerPath) 

dim objFSO 'Filesystemobject variable 

dim obi Folder 'Folder object variable 

dim col Files 'collection of file object 

dim objFile 'File object variable 

dim StrResult 'String containing the list of URLs. 

set objFSO = server. CreateObjectC "Scripting. FileSystemObject" ) 

'Get the folder object from the FSO object, 
set ob:jFolder = objFSO.GetFolderC strPath ) 
set objFSO = nothing 

'Get the file collection from the Folder object, 
set col Files = objFolder. Files 
set objFolder = nothing 

'create the list using files of the folder as data. 
StrResult = "<table><tr>" 
const iNoOfCols = 3 

for each objFile in col Files 
'check for a thumbnail 
if instr(l, objFile. Name, "th_") > 0 then 
i = i + 1 
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strResult = strResult & " <td><input typG=radio namG=image 

value='" + _ 

rightCobjFile.Name,lenCobjFile.Name)-3) + "'ximg src=" + 
strServerPath + objFile.Name + "></td>" 
end if 

* Check for end of row 
if i = iNoOfCols then 

StrResult = StrResult + "</tr><tr>" 

i = 0 

end if 

next 

StrResult = StrResult + "</table>" 

if col Files. Count <> 0 then 

createListFromFolder = strResult 

else 

'Return nothing when the directory is empty 
createListFromFolder = 
end if ^ } 

set obi File = nothing ^ 
set col Files = nothing 

end function%> 
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<%@ Language=VBScript %> 

<html> 

<head> 

<ti tl e>Regi strati on Conf i rmed</ti tl e> 
<!— #incTude file="inc/top_inc.inc" — > 
<!-- #include file="inc/database.inc" --> 

<td a1ign="center"><%'Code start 

set rs = server. CreateObjectC"ADODB. Recordset") 

if SessionC'user") = then 
'If new user 

sUserName = Request .FormC'username") 
sSQL = "Select username from user_info where username = '" + 



SUserName + 



rs.Open sSQL,db 



if not rs.EOF then 

Response. Write 

"<BR><BR><BR><BR><font face= 'Verdana, Arial ,: Helvetica' size='2'>This username is 
taken. <BR><BR>click " + _ \ 

\ ' "<a 

href=' javascript:history.backO '>here</a> to go back and choose another username." 

else 

rs. Close 

sSQL = "insert into user_info 
(username, password, f i rst_name,l ast_name, Age, Sex, " + _ 

"emai 1 , addressl , addressZ , ci ty , state_i d , zi p_code , phone , u rl , party^i d , " + 

"newsletter,create_date) VALUES ('" 
for i = 1 to Request. Form. Count - 4 
if not i = 3 then sSQL = 

SSQL + Request. Form(i) + " ','" 

next 

SSQL = SSQL + "#" + cstrCdate) + 

SSQL = replaceCsSQL, "'#","#") 

db. Execute ssql 

rs.Open "Select user_id from 

user_info where username='" + sUserName + "'" 

Session("user") = cstr(rs(0)) 

'send welcome message 
sBody = sBody + "Hello " + 

Request. Form("first_name") + " " + Request . FormC"last„name") + "," + chr(13) + 

chr(13) 

sBody = SBody + "Thank you for 
ioining eYardSigns.com - the new online eCampaigning Tool " + _ 

"which has revolutionized the 
standard yardsigns usually found on lawns across America." + chr(13) + chr(13) 

sBody = sBody + "Next time you visit 
eYardSiqns.com, you'll need to sign in to your account " + _ 

"by typing in the User Name with 
which you registered and your password." + chrC13) + chrC13) 

sBody = SBody + "User Name : " + 

SUserName + chr(13) + chr(13) 

sBody = SBody + "Here are some of 
the other FREE exciting features eYardSigns.com has to " + _ . . 

"offer:" + chr(13) + chr(13) 
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sBody = sBody + Create and 

maintain custom Email lists" + chr(13) ^ . , 

SBody == SBody + Fast and reliable 

eYardSign creation and sending" + chr(13) . „^ 

SBody = sBody + * import Email 

addresses from various mail clients from your desktop" + chrC13) 

sBody = SBody + "^^ 24/7 Live 

Customer Support via World wide Web" + chrC13) . » 

SBody = SBody + * Personalize each 

evardsign, by entering your own content, logo, and " + _ . „ , ^^-.^ 

"musical tune options" + chr(13) 
sBody = SBody + "* Review the 

results and the responses from your sent eYardSigns" + chr(13) 

SBody = sBody + * and best of all 

utilizing the www.ElectionMall.com vortal for unlimited " + _ . . 

"features and services + chr(13) + 

chr(13) 

i sBody = sBody + "Have fun exploring 

eYardSiqns.com and taking advantage of alt df these " + _ 

"fabulous features for FREE! We 

look forward to helping you manange and promote your " + „ 

"CAMPAIGN." + chr(13) + chr(13) 

sBody = sBody + "To begin using this 

exciting new eCampaigning Tool, simply click here" + . ^ . . 

" www.eYardSigns.com and sign in. + 

chr(13) + chr(13) 

SBody = SBody + "sincerely," + 

SBody = SBody + "The eYardSigns.com 
SBody = SBody + 

sBody = sBody + "P.S. Did you forget 

your Password? Click here " + _ 

"http://www.eyardsigns.com/forgot„pass.asp" + _ . . 

^ " and simply enter your email 

address, and shorty we'll send you your Password " + _ > 

"(note: Password is case sensitive) 

via email." + chr(13) + chr(13) 



chr(13) + chr(13) 
Team" + chrC13) 

"support@eyardsigns.com" + chr(13) + chr(13) 



one-time email . " 

server. CreateObjectC"JMai 1 -SMTPMail") 
"mai 1 hub . regi ste redsi te . com" 



sBody = sBody + "Note: This is a 
set DMail = 

'This is my local SMTP server 
JMail .ServerAddress = 

'This is me. . . . 
JMail .sender = 



"welcome@eyardsigns.com" .... „ n 

DMail .subject = welcome to 

eYardsigns.com" 



Request. Form("email") 



JMail .AddRecipient 
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JMail .Body = sBody 
JMail .Priority = 3 
'Send it. . . 
JMail .Execute 

Response. write 

"<BR><BR><BR><BR><font face= 'Verdana , Arial, Helvetica' size=' 2 '>Your registration 

is complete <BR><br>" ^„ „„ . 

^ if Request. FormC'ref") - then 

sRef = "default. asp" else sRef = Request. Form("ref") 

Response. Write <a 

href=donate content. asp>Sign up for Donations</a>     " 

Response. write "<a href=' + sRef + 

" " >Home page</a> . <br><br><br><br><br>" 

end if 

rs. Close : set rs = nothing 

else 

'if Update Profile 
Dim i5Arr_Fields(15) 

sA}rrLFieldsCO) = "password" : sArr_Fields(l) 
= "password" : sArr_FieldsC2) = "fi rst„name'^ . 

sArr_FieldsC3) - "last_name" : 

sArr_Fields(4) = "Age" : sArr_Fields(5) = "Sex*; , 

sArr_FieldsC6) = "email" : sArr_Fields(7) 

"addressl" : sArr_Fields(8) = "addressZ" , „ . „ , ^^^.1n^ 

sArr„Fields(9) - "city" : sArr_FieldsC10) = 

"statejd" : sArr„Fields(ll) = "zip^code" , u a lA.r^^t^ 

sArr_FieldsC12) = "phone" : sArr_Fields(13) 

= "url" : sArr_FieldsC14) = "party_id" . n 

sArr_Fields(15) = "newsletter 

sSQL = "UPDATE user_info SET " 

for i = 3 to Request. Form. count - 4 

SSQL = SSQL + sArr_FieldsCi-2) + 
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"='" + Request. Form(i) + 
user_id = " + Session("user") 



next 

SSQL = left(sSQL,len(sSQL)"l) + WHERE 
db. Execute sSQL 



Response. Write "<BR><BR><BR><BR><font 

face- 'Verdana, Arial, Helvetica' size-'2'>" , u • x ^- u 

Response. write Your Member information has 

been updated. <br><BR>" . „ . . 

Response. write click <a 
h ref = ' def aul t . asp ' >here</a> to conti nue . </f ont><BR><BR><BR><BR><BR>" 

end if 

'clean up 

db. close : set db = nothing 
'code end%> 

<!-- #include file="inc/bottom_inc.inc" 
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<%@ Language=VBScript %> 

<HTML> 
<HEAD> 

<title>Contact us</title> 
<!-- #INCLUDE file="inc/top„inc.inc" --> 
<td>&nbsp ; &nbsp ; &nbsp ; </td><td cl ass="normal 
<!-- #INCLUDE file="inc/contactus.inc" --> 

<!-- #INCLUDE file="inc/bottom_inc.inc" --> 
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Language=VBScript %> 
<%Response. Buffer = true 
Response . Expi res=0 
Response. Clear%> 
<htm1> 
<head> 

<ti tl e>Previ ew eYardSi gn</ti tl e> 

<!-- #include file:="inc/session_timeout.inc" --> 

<!-- #include file="inc/top_inc.inc" 

<td width="98%" align="center"> 

<!— #include file="upload/outputfile.asp" --> 

<% 

sPosition = UploadRequest .ltemC"s„title") -itemC'value") 
sTitle = UploadRequest.ltemC"s_position") ■ltem("value") 
simaqe = uploadRequest .ItemC'iniage") .ltem("value") 
sEmail = UploadRequest.itemC"s__email").ltem("Value") 
sMessage = uploadRequest .ltem("messaqe") -itemC'value") 
sFirst^Name = UploadRequest .itemC"s_rname") .ltem("value") 
sLast„Name = uploadRequest.ltem("s_lname'*) .itemC'value") 
ssubject = uploadRequest.ltemC'subject") .itefnC'value") 

ssiteURL = ' 
sMusic = UploadRequest.ItemC'music") .ltem("value ) 

'Upper%> 

<!-- #include file="inc/top_mail .inc" --> 



<%' start Yard Sign 










select 


case simage 
case "!'•%> 












<! — 


#inc1ude 


file="inc/yardl. 


inc" 


- > 


<% 


case "2"%> 












<! — 


#include 


file="inc/yard2 


inc" 


--> 


<% 


case "3"%> 












<! — 


#include 


file="inc/yard3 


inc" 


--> 


<% 


case "4"%> 












<! — 


#include 


file="inc/yard4 


inc" 


— > 


<% 


case "5"%> 












<! — 


#include 


file="inc/yard5 


inc" 


--> 


<%end 


select 










'Lower%> 













<% call insertButtonsC) 

sBodyl = mid(sBodyl,13,len(sBodyl)-27) 
Response. write sBody + sBodyl%> 

<form name="forml" action="5electlist .asp" method= post > 
<table align="center" xtrxtd align="center" 
width="150"> </td><td> , . „ 

<input name="buttonl" value="Change eYardSign" type- button 
one! ick="javascript: hi story. back()"> . „ . , - .. l. -^m 

 <input name="subnii tl" value="Send eYardSign" type= submit > 
 <input name="buttonl" value-"Cancel " type="button" 
oncl i ck=" j avascri pt : document . 1 ocati on= ' def aul t . asp ' "> 
</t rx/tdx/tabl e> 



"SPosition" value="<%=sPosition%>" type="hidden" > 
'sTitle" value="<%=sTitle%>" type="hidden" > 
"simage" value="<%=slmaqe%>" type=" hidden" > 
'^sEmaTv value="<%=sEmail%>" type="hidden" > 
"SMessage" value="<%=sMessage%>" type="hidden" > 
"sFname^ value="<%=sFi rst_Name%>" type=:"hidden" > 
MHw- .-cM.^-'sLname" value="<%=sLast_Name%>" type-"hidden" > 
nput name="ssubject" value="<%=ssubject%>" type="hidden" > 
nput name="sMusic" value="<%=sMusic%>" type="hidden" > 
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<input name= 
<input name= 
<input name= 
<input name= 
<input name= 
<input name= 
<i 

<input 



Copy of sendmail .asp 
<input name="sSiteURL" value="<%=sSiteURL%>" type-"hidden" > 
<input name="sLogo" value="<%=:SLogo%>" type="hidden" > 

</form> 

<!-- #include file="inc/bottom_inc.inc" --> 

<% 

function insertButtonsO 

sBody = sBody + "<TR><TD colspan=*7' a1ign=' center '><BR> 

sBody = SBody + "<TABLE borer='0' censpacing='0' cellpadding^'O* 
width='100%'><TR>" . ^ ^ , ^ 

SBody = sBody + "<TD colspan='5' a1ign=' center *><font face=:' Verdana, Anal 
size='2'><B>" , ^. , . X • 

SBody = SBody + "Please show your support by clicking on fo Mowing 

iconS<BR><BR></B></font></TD></TR><TR>" 
'Headquarters 

SBody = sBody + "<TD widths '20%' align=' center '>" 
sBody = sBody + "<img src='" + sSiteURL + "grfx/hdq.gif ' border='0' 
al t= ' Headquarters ' ><BR>" 

SBody = sBody + "<font face=' Verdana;, Anal 
si ze= ' 1 ' >Headquarters</f ont></TD>" 

'Donate \ 

sBody = SBody + "<TD width='20%' al i*gn=' center '> 
SBody = sBody + "<img src='" + sSiteURL + "grfx/donate.gif ' border='0' 
alt=' Donate '><BR>" ,^r^ .r 

SBody = sBody + "<font face=' Verdana, Anal' size='l'>Donate</font></TD> 

'volunteer 

SBody = sBody + "<td width='20%' align=' center '> 
sBody = SBody + "<img src-'" + sSiteURL + "grfx/volunteer .gif ' border= 0 
alt='volunteer'><BR>'* , . . . ,^ ^ /^r. 

SBody := sBody + "<font face=:' Verdana, Anal' size-'l'>volunteer</font></TD> 

'Send to Freind 

sBody = sBody + "<TD width='20%' align=' center '> 
sBody = sBody + "<img src="' + sSiteURL + "grfx/sendtoaf riend.gif border- 0 
alt='Send to a Friend'><BR>" . _ 

SBody = sBody + "<font face=' Verdana, Anal' size='l >Send to 
Fri end</f ont></TD>" 

'Vote 

SBody = sBody + "<td width='20%' align=' center 
sBody = sBody + ^^<img src="' + sSiteURL + "grfx/vote.gif ' border= 0 

alt='VOte'><BR>" .... ,r: f^r. n 

SBody - sBody + "<font face=' Verdana, Anal' size=' l'>Vote</font></TD> 
sBody = SBody + "</tr></table></td></tr></table>" 
end function%> 

<!-- #include file="SCRiPTS/replace_apost.code" --> 
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custom„yardsi gn . asp 

<%@ Language=VBScript %> 
<%Response. Buffer = true%> 

<HTML> 
<HEAD> 

<ti tle>Custoni Yardsign</ti tle> 

</HEAD> 

<BODY> 

<p> </p> 

<%ssubject = Request. FormC'sasubject") 

sRef = Request. Form("saref") 

rEmail = Request. FormC'saemail") 

sName = Request .Form("saname") 

sEmail = Request. Form("sasender_email")%> 

<!-- #include file="inc/rnc/yard_rncl.inc" --> 

<% 

Set JMail = server. CreateObjectC'JMail .SMTPMail") 
'This is the local SMTP server 

jMail .ServerAddress = "mailhub.registeredsite.com" 
'This is User 

JMail. Sender = sEmail i 
JMail .Subject = sSubiect { ' 

JMail .ContentType = ^'text/html" ^ 
JMail .AddReci pi ent rEmail 
JMail .Body = sBody 
JMail .Execute 

Response . Redi rect sRef 

%> 

</BODY> 
</HTML> 
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default. asp 

<%@ Language=VBScript %> 

<html> 

<head> 

<ti tl oeYardSi gns</ti tl e> 

<!-- #inc1ude file="inc/top_inc.inc" --> 

<td valign="top"> 
<%if sessionC'user") = "" then%> . „ „ 

<table censpacing="0" cenpadding="0" width="308" border="0"> 
<tbody> 

^^Ktd align="right" width="158"><img height="44" src="grfx/eyard_homel.gif " 
width="122"></td> 

<td width="150"> </td></tr> 

^^Zd width="158"><img height="59" src="grfx/eyard_ani .gif" 
width="158"></td> . . , , . . 

<td width="150"><img height="59" src="grfx/ eyard_home2.gif 
width="150"></td></tr> 

^^<td a1ign="right" width="158"><ima height="149" src="grfx/eyard_home4.gif' ' 
width="130"></td> \ ' ^ , , , , .^„ 

<td width="150"><img height="149" » src="grfx/eyard_home3 .gif 
wi dth=" 150"></td></t rx/t bodyx/tabl e></td> 
<td vAlign="top" width="296"'> 
<form name="forml" action="login.asp" method=' post > 
<table censpacing="l" cellPadding="2" width="296" border="0 > 
<tbody> 

^ Sd width="15"><a ... 

href="javascript:portWin('flas/tutf1ash. htm' ,620,420) ximg height= 15 
src="qrfx/neweyardarrow.gif" border="0" width="15"></a></td> 

<td width="28r><a . .„ ^ ^ .. ^ • -, 

href="javascript:portwinC'flas/tutflash.htm' ,620,420)"><font face= Verdana, Anal, 

Helvetica, sans-serif" color="#092186" size="l">Design your 

eYardSi gn ! </a></f ont></td></tr> 

<tr> 

<td width="15"><a , . . „^^„ , 

href="javascript:portwin('flas/tutflash.htm' ,620,420)"><Tmg height= 15 border= 0 

src="grfx/neweyardarrow.gif" width="15"></a></td> 

<td width="28r><a ^„ ^ ^ ^ . , 

href="javascript:portwinC'flas/tutflash.htm' ,620,420)"><font face="verdana, Anal, 
Helvetica, sans-serif" color="#092186" size="l">lmport or create your own email 

1 i st</a></font></td></tr> 

<tr> 

<td width="15"><a ^ „„„ ^ . , „,^., 

href="javascript:portWinC'flas/tutflash.htm' ,620,420)"><img border="0" height= 15 

src="grfx/neweyardarrow.gif" width="15"></a></td> 

<td width="28r><a ...... ^ 

href="iavascript:portwinC'flas/tutflash.htm' ,620,420)"><font face="verdana, Anal, 

Helvetica, sans-serif" color="#092186" size="l">Preview and send your 
eYardsign</a></font></td></tr> 
<tr> 

<td width="15"><a ^„ , . ^ „^^„ 

href="javascript:portWin('flas/tutflash.htm' ,620,420)"><img border="0" height= 15 

src="grfx/neweyardarrow.qif" width="15"></a></td> 

<td width="28r><a . .. 

href="iavascript:portwin('flas/tutflash.htm' ,620,420)"><font face= Verdana, Anal, 
Helvetica, sans-serif" color="'#092186" size="l">Track and evaluate your eYardSign 
responses</a></font></td></tr> 

<tr> 

<td width="15" valign="bottom"><a href="donate_content . asp ximg 
border="0" height="15" src="grfx/neweyardarrow.gif " width="15"x/a></td> 
<td width="28r' vaTign="top"xa href="donate_content.asp"xfont 
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default . asp 

face="verdana, Arial, Helvetica, sans-serif" color="#092186" size="l">Collect online 
Donations via eYardSigns !</a></t» <img border="0" height="15" 
src="grfx/new„l.gif"></font></td></tr> 
<tr> 

<td width="15"><img border="0" height="15" src="grfx/neweyardarrow.gif" 
width="15"></td> 

<td widths" 281"><font face="verdana, Arial, Helvetica, sans-serif" 
color="#092186" size="l">and its all for <font 
size="2"><b>Free</b></font></font></td></tr> 

<tr> 

<tr> 

<td colSpan="2" height="5"></td></tr> 
<tr> 

<td colspan^"2" valign="top"><a href="regi ster .asp"><font face="Verdana, 
Arial, Helvetica, sans-serif* color="#092186" size="3"><img height-"13" 
src="grfx/eyard_button2.gif" width="21" border^"0"> Sign up <font 
si ze="4"><b>FREE</b></f ontx/f ont></a> 

           

<a href="pricing.asp"><img src="grfx/custombutton.gif " border="0" 

WIDTH="80" HEIGHT="80"></a></td> 

</tr> \ - 

<tr> ^ 
<td width- '15"> </td> 

<td width="281"><font face=" Verdana, Arial, Helvetica, sans-serif" 
size="l"><b><font col or="#092186">Al ready a 
member?</font></b></font></td></tr> 
<tr> 

<td colSpan="2"> 

<table cellspacing="2" cenPadding="2" width="100%" border="0"> 
<tbody> 

<tr> ^ . 

<td align="right" width="50%"><font face="verdana, Anal, Helvetica, 
sans-serif" size="2"><b>username</b></font></td> 

<td><input name="user"> </td></tr> 
<tr> ^ . 

<td align="right" width="50%"><font face="Verdana, Arial, Helvetica, 
sans-serif" size="l"><b><font size="2">password</font></b></font></td> 
<td><input type="password" nanie="pass"> </td></tr> 
<tr align="middle"> . . „ 

<td colSpan="2"><input type="submi t" value="Login" name= Submit > 
</td></tr> 
<tr align="middle"> 

<td colSpan="2"><font face=" Verdana, Arial, Helvetica, sans-serif 
size="r'><a href="forgot_pass .asp">Forgot your 
password?</a> 

</font></td></tr></tbody></table></td></tr></tbody></table></form> 
<%else%> 

<!-- #include file="inc/database,inc" --><% 

set rs = server. CreateObject("ADODB. Recordset") 

sSQL = "Select * from user_info where user„id = " + 

SessionC'user") 

rs.Open sSQL,db 

if not rs.EOF then%> 

<table border="0" cellPadding="10" cellSpacing="2" 

width="98%" align="center"> 

<tr> 

<td colspan="2"><font color="#092186" face="verdana, 
Arial, Helvetica, sans-serif" size="4"><b>Welcome <% Response.wri te rs("Fi rst_Name") 
+ " " + rs("Last_Name")%>:</b></font></td></tr> 

<%' Emai 1 mai ntenance%> 

<tr><td> 
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default. asp 
<a href ="emai l_mai ntenance . asp"> 
<img src="grfx/eniai lmaintain.gif" alt-"Add/Delete 
email list and import email addresses from Desktop" border="0 ' valign="top" 

WIDTH="118" HEIGHT="39"></a> 

<font face="verdana, Arial, Helvetica, sans-senf 

size-"r><br> ^ . 

Before creating and sending an eYardsign, you must 

add email addresses to your 

<a 

href="java5cript:portWin('personal .htm' ,300,150)">Personal ListCs)</a>.</font> 

</td> 

<td><a href:^"designs.asp"> 

<img src="grfx/createeyardsign.gif" alt="Create your 
custom evardsign" border="0" WIDTH="98" HElGHT="39"></a> 

<font face="verdana, Arial, Helvetica, sans-senf 

size="l"><br> 

Once your list(s) are created you are ready to 
create your custom eYardsign.</font> 

</td></tr> ; 
<tr> 

<td><a hre{F=-tracking.asp"><img border="0" 
P alt="Track and review all sent eYardsigns and Responses" 
iJI src="qrfx/eyardsi gn_result.gif" WIDTH-'^gS" HElGHT-"38"></a> 

;S <font face="verdana, Arial, Helvetica, sans-senf 

^2 size="l"><br> .... 

Review your sent eYardsign(s) and its 

IH responses . </f ont> 

HI ^ </td> 

i <td><img border="0" alt="Search for Volunteers, 

Forwarders. Voters, and Donaters." src=^grfx/search.gif" WIDTH="81" height="40"> 

a <font face="verdana, Arial, Helvetica, sans-senf 

size="l"><br> 

search for <a 

href="volunteer„search.asp">volunteers</a>, <a href="sendtof riend_search.asp >Send 

to friends</a>, <a href="vote_search.asp">Voters</a>, 
P and <a 

lij href ="donate_search . asp">Cont ri butors</a> . </f ont> 

</td></tr> 

</table> 

^ <%else . ^ 

Response. Write "<font face=' Verdana, Anal, 
Helvetica" size='2'>incorrect login</font>" 

end if 
'Clean up 

rs. Close : set rs = nothing 
db. close : set db = nothing 

end if%> 

<!-- #include file="inc/bottom_inc.inc" --> 
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deletelist.asp 

<%@ Language=VBScript %> 
<%Response. Buffer = true%> 
<html> 
<head> 

<title>Add New List</title></head> 

<BODY BGCOLOR="#FFFFFF" TEXT=" #000000" LINK-"#3333CC" VLINK="#000066" > 

<!-- #include file="inc/database.inc" --> 
<%'Code start 

set rs = server. CreateObjectC'ADODB, Recordset") 

ListValue = Request . FormC'deleteli st") 
sArr_List = splitCListValue,"-") 
sList_Name = sArr_ListCl) 
sList_id = sArr_List(0) 
suser_id = SessionC'user") 

sSQL = "Delete ^ from email where list_id = " + 
sList_id + " AND user_id = " + sUser_id 

db. Execute sSQL 

sSQL = "Delete - from user„list_link where list_ 
" + sList_id + " AND user_id = " + suserjid" 

db. Execute sSQL 
* Clean Up 

db. close : set db = nothing%> 
<TABLE WIDTH="100%" HEIGHT="100%" CELLPADDING=0 CELLSPACING=0 BORDER=0> 
<TR> 

<TD HEIGHT="100%" VALIGN=MIDDLE ALIGN=CENTER> 

<TABLE WIDTH="100%" HEIGHT="100%" CELLPADDING=0 CELLSPACING=0 BORDER=0> 
<TR> 

<TD HEIGHT="100%" VALIGN=MIDDLE ALIGN=CENTER> 

<FONT SIZE="4" FACE="arial, helvetica" C0L0R="RED"> 

<STRONG>Please wait while we process your request. . .</STRONG></FONT><BR></TD> 
</TR> 

</TABLE></TD> 

</TR> 

</TABLE> „ .-1 • ^ MO/ 

<%Response.Redi rect "email_maintenance.asp %> 

</body></html> 
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designs. asp 

<%@ Language=VBScript %> 
<html><head> 

<ti tle>Choose your Design</ti tle> 
<!-- #include fi1e="inc/session_timeout .inc" 
<!-- #include file="inc/top_inc.inc" --> 
<td valign="top" align="center"> 

<tabTe border="0" cellpadding="5" cellspacing="5" width="98%" 

align="center"> 

<tr bgcolor="#c0d5fc"> 

<td colspan="3"><font face-"verdana, Arial, Helvetica, 

sans-serif" size-"4"><b> 

STEP 1 : eYardSigns <font size="l">(Select ONE eYardsign of 
your choice from below)</font></font></b></td></tr> 
<tr> 

<td WIDTH="160" ALIGN=:"middle"> 

<a href="postcard.asp?image=l"> 
<img a1t="Vote for me" border="0" 
src="grfx/yardl.gif" WIDTH="172" HEIGHT="169"></a> 

</td> : 

<td WIDTH="160" ALl?3N^"middle"> 

<a href-"pjostcard.asp?image=2"> 
<img alt="vote for me" border-"0" 
src="grfx/yard2.gif" WIDTH="150" HEIGHT="175"></a> 

</td> 

<td WIDTH=:"160" ALlGN="middle"> 

<a href="postcard,asp?image=3"> 
<img alt="vote for me" border="0" 
src="grfx/yard3.gif" WIDTH="150" HElGHT="175"></a> 

</td> 

</tr> 
<tr> 

<td WIDTH="160" ALIGN="middle"> 

<a href="postcard.asp?image=4"> 
<img alt="Vote for me" border="0" 
src="grfx/yard4.gif" WIDTH="150" HElGHT="175"></a> 

</td> 

<td WIDTH="160" ALlGN="middle"> 

<a href="postcard.asp?image=5"> 
<img alt="vote for me" border="0" 
src="grfx/yard5.gif" WIDTH="150" HElGHT="175"></a> 

</td> 

<td WIDTH="160" ALIGN="middle"> 
  

</td> 
</tr> 

</tabl e> 

<p align="center"><input type=:"button" name="buttonl" value="Back" 
one! i ck="hi story . backC)"></p> 
<!-- #include file="inc/bottom„inc,inc" --> 
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doimport .asp 

<%@ Language=VBScript %> 
<html><head> 

<title>Select import File </title> 

<!-- #include file="inc/session„timeout .inc" --> 

<!-- #include fi1e="inc/top„inc,inc" --> 

<td > 

<%'Code start 
session. Timeout = 500 
Dim Arr„Clients(4) 

Arr_.Clients(l) = "Microsoft OutLook" 

Arr_Clients(2) = "OutLook Express" 

Arr_Clients(3) = "Palm Desktop" 

Arr_Clients(4) - "Netscape Client" 

iclient = Clnt(Request .Querystring("client"))%> 

<table border="0" cenPadding-"0" cellSpacing-"0" width="100%"> 
<tr bgcolor="092186"> 

<td align="left"><font face="verdana, Arlal, Helvetica, sans-senf 

color="#ffffff" size="4"> 

<b>import from <%=Arr_Clients(iClient)%>:</b> 
</td></tr><TR><TD> </td></tr><TR bqy:olor="COD5FC ><TD> 

<font face="Arial, Helvetica, sans-sertif" size="3" ><b>lnst ructions for creating 
a comma separated Value (CSV) from ^ 

<%=Ar r_cl i ents (i cl i ent)%> : </b></f ont> </td></tr> 
</tabl e><br> 
<%select case iclient 

case 1:%> , . , . „ 

<!-- #include file="import/outlook.htm --><% 

case 2:%> , , n. 

<!-- #include file="import/express.htm --><% 

case 3:%> . 

<!-- #include file="import/palm.htm —><% 

case 4:%> . „ n/ 

<!— #include file="import/netscape.htm --><% 

end select%> 

^BR^ 

<form action="list.asp" encType="multi part/form-data" method-"post" 

name="forml"> 

<input name="list" type="hidden 
val ue="<%=Request . QueryStri ng("l i st")%>"> 

<input name="client" type="hidden" 
value="<%=Request.QueryStringC'client")%>"> , , 

<font face=:"AriaT , Helvetica, sans-senf size= 2 > 

<B>Specify the comma separated value (csv) file to 
import :</B></font><BR> , . ^„ 

<input name="filer type="file" size="10"> <BR><BR> 

<input id="submitr name="submi tl" type="submi t" value= import > 
<input name="buttonl" type="button" value="Cancel 
oncl i ck^"iavascri pt : hi story . back() "x/tdx/t r> _ . 

<!-- #include file="inc/bottom_inc.inc —> 
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donate_conf i rm . asp 

<%@ Language=VBScript %> 

<HTML> 

<HEAD> 

<ti tl e>Conf i rmati on</ti tl e> 

<!-- #INCLUDE file="inc/top_inc.inc" 

<!-- #INCLUDE file="inc/database.inc" 

<td>&nbsp ; &nbsp ; &nbsp ; </td><td cl ass="normal "> 

<% 

set DMail = server. CreateObject("JMai 1 .SMTPMail") 
'This is my local SMTP server 

JMail .ServerAddress = "mailhub.registeredsite.com" 
'This is me 

jMail. sender = "contribution@eyardsigns.com" 
3Mail .Subject = "eYardSigns Donation subsystem" 

jMail .AddRecipient "kesh@wearethesolution.com" 
JMail -AddRecipient "sachin@wearethesolution.com" 



"send Mail to the guy witht attachement 

'3Mail .ClearRecipients ^ 
sBody = "Thank you for signing up and filling out our setup form 

with eYardSigns." + _ . , , ^. ^ n ^- ^ 

" You are about to enjoy the many benefits of collecting, and 
raising funds via the latest and safest " + _. ^ , , . 

"technology the web has to offer. Attached to this email you will 
find our client Contract. Please print" + _ ... 

" out the client Contract and sign and date it. Once complete, 
please fax the signed copy to ###-###-####. " + _ ^, 

"Once we receive your signed contract, we will have our Client s 
Service's Department sign and date the contract, " + 

"and fax it back to you for your records. + vbcrlf + vbcrlf + 
Request. Form("email") + vbcrlf + Request . Form("select") + _ 

vbcrlf + SessionC"user") 

DMail .Body = sBody 
JMail .AddAttachment 
(server.MapPath("inc\Electionmall .com_Client^greement_v3. 5.pdf )) 
JMail .Execute 

' Enter in Database 
suser = session("user") 

SSQL = "INSERT INTO Donatejnfo (user_id, donate„mail) values C + 
suser + ",'" + sMailBody + "')" ... n 

SSQLl = "UPDATE user_Info SET Donate_Flag = 1 WHERE user_id = + 

suser 

db. execute sSQL 
db. Execute sSQLl 

db. close : set db = nothing 

%> 

<BR><BR><BR><BR><p al i gn="center"> 

<font face="Arial" size="2">Donation Registration Complete Please 
fill the attached document and Fax it to us asap. . .<br><br> 
<a href="default.a5p">Continue. . .</a><BR> 

</font><BR><BR></p> 



<!-- #INCLUDE file="inc/bottom_inc.inc" --> 
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donate„content . asp 

<%@ Language=VBScript %> 

<html> 

<head> 

<ti tl e>Onl i ne Donati ons</ti tl e> 

<!— #INCLUDE file="inc/top„inc.inc" --> 

<td>   </td><td class="normal"> 

<p align="cGnter"><font size="4"><b>0nline Donations via eYardsigns.com</b></font> 
</p> 

<%if sessionC'user") = then%> 

Where traditional emailing and the latest online fundraising technology meets = 
evardsign's! , . . . ^ ^ - . 

with the Internet rapidly growing, and eCampaigmng and fundraising becoming ever 

^competitive, you need to utilize the newest and safest tools for raising online 
donations , „ . . , . , , ^ 

for your Non-Profit Organizations, Charities, Political Action Committee s (PAG sj , 

campaigns, with our patent-pending solutions, these electronic-yard signs will be 
your ; . , . . 

24-hour fundraising tool, with safety ajid-secunty as our number one priority, we 

have 

teamed up with the Industry's leading source for online fundraising solutions. 

This . j= ^ ^ ' - 

allows us to offer legally compliant and cost-effective means of fundraising. 

^^^only will you be able to raise money, but you will also have the capability to 
collect . , - . ^ 

data and review and print reports for your records. These solutions, will not 

°" ^ease your administrative tasks, but also help increase the accuracy of your 

records. , . . 

All of these fundraising solutions would traditionally cost too much money and 
man-power, but our solutions will be cost efficient and will let you focus on 

you do best. Our service has no up-front fees and no recurring charges. For 

every 

dollar contributed through our eYardSign's a small fee, reduced by volume, is 
retained for all of our basic services, why have people come to your DONATE 

LINK, 

when the LINK can come to them! 

</p><P>^^^^ are some of our basic services when you sign up for FREE! we include 
all of the following fundraising and communication services for our low 
per transaction rate. 

<ul> 

<li>secure credit card, checking and check card transactions 
<li>Multiple account processing 

<li>An credit card, merchant banking and bank transfer fees 
<li>Reconciliation reports of all transactions 
<li>Unlimited donation areas 
<li>lmmediate high donor notification 

<li>Compliance with federal, state and local fundraising laws 
<li>Compilation of reporting data 
<li>Contributor data maintenance 
<li>Profiling and demographics, and 

<li>24-hours-a-day, seven-days-a-week internet access to 
your organization's reports and data</li> 

<p></p><p>If you are ready to activate your donation button and take advantage of 

the ^ . 

latest technology for online fundraising on your eYardSign.</p> 
<center><img src="grfx/blink.gif" WIDTH="200" HElGHT="261"></center> 
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<table width="60%" align="center"><tr><td class="normal "><a 

href='n ogi n . asp?ref=:donate_content . asp">Si gn i n</a></td> 
<td class="normal "><a 

h ref=" regi ster . asp?ref=donate„content . asp">Regi ster</a></td></tabl e> 

<%else%> . . „ 

<!-- #include file="inc/database.inc --> 

<%set rs = server. CreateObjectC'ADODB. Recordset") 

sSQL = "SELECT email from user_info WHERE user„id = " + 

Session("user") 

rs.Open sSQL,db 

sEmail = rsCO) 

rs. Close : set rs = nothing 
db. Close : set db = nothing 

%> 

<p>lf you are ready to activate your donation button and take advantage of the 
latest technology for online fundraising o^i your eYardSign.</p> 

<?orm name="forml" method="post" action="donate_confi rm.asp"> 
<select name="select" > 

<option value="0" selected>&l t ; select ></option> 

<option value="Candidate">Candidate</option> 

<option value="Non-Profit OrQani2ation">Non-Profit OrgamzatTon</option> 
<option value=" Political Action Committe CPAC)">Political Action Committe 
CPAC)</option> 
</select> 

<BR><BR> -n . M 

email address <input name="email" value= <%=s Email %> ><BR><BR> 

<input type="submit" name="submi tl" value="Submit"> 

</form> 

</p> 

<%end if%> 



<!-" #INCLUDE file="inc/bottom_inc.inc" --> 
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donate„form.asp 

<%® Language=VBScript %> 

<html> 

<head> 

<ti tl e>Cont ri buti on Form</ti tl e> 
</head> 

<body bgcolor="092186"> 

<!— #include file="inc/convert„trackid.inc" --> 

<!— #inc1ude file="inc/database.inc" --> 

<% set rs = server.CreateObjectC'ADODB, Recordset' ) 

sSQL*= "select First_Name, Last_Name from Mail_Tracking where track_id = 
sTrack^id 

rs.open sSQL,db , 
if not rs.EOF then sName = rs(0) + " + rs(l) end if 

rs. Close : set rs = nothing 
db. Close : set db = nothing 

%> 

<table width="600" border="0" censpacing="0!' cenpadding="0" align="center"> 

"^^Sd width="17" align="nght"><img src^'gV-fx/pop.cornerl.gif ' width="20" 
height="20"></td> , \ , 

<td bgcolor="COD5FC" width="74"> </td> 
<td bgco1or="C0D5FC" width="486"> </td> ^ 
<td width="18" align="left"><img src="grfx/pop_corner2.gTf width= 20 
height="20"></td> 
</tr> 

<tr> , . 

<td width="20" bgco1or="COD5FC"> </td> 

<td width="74" bgco1or="COD5FC"> ^ , ^ ■ u ^ -n- 

<a href="http://www.eyardsigns.com"><img src="grfx/eyard_imgl.gif border= 0 

width="70"></a></td> 

<td width="486" bgcoTor="cOD5FC" align="center' > 

<%set ad = server. createobjectC'MSWC.AdRotator") %> 

<%= ad.GetAdvertisement("inc/adrot_lng.txt") %> 

</td> 

<td width="20" bgcolor="C0D5FC"> </td> 
</tr> 

^^<td width="20" height="3" bgcolor="C0D5FC"><img src="grfx/bl uespacer.gif" 
idth="l" height="l"></td> „ . ,. ^ 

<td width="74" height="3" bgcolor="COD5FC"><Tmg src="grfx/b1uespacer.gif 
width="l" height="l"></td> „ . „ . 

<td width="486" height="3" bgcolor="C0D5FC"><img src="grfx/bl uespacer.gif 
width="l" height="l"></td> „ . „ . _ 

<td width="20" height="3" bgco1or="C0D5FC"><img src="grfx/bl uespacer.gif 
width="l" height="l"></td> 
</tr> 

^ <td width="20" bgco1or="cOD5FC"> </td> „ , . „.o„ , . 

<td width="74"><img src="grfx/1ogo_half .gif" width="74" height= 20 ></td> 
<td width="486"><img src="grfx/logo_half2 .gif" width="60" height="20 ></td> 
<td width="20"> </td> 

</tr> 

<tr> 

<td width="20" bgcolor="COD5FC"> </td> 

<td colspan="2" bgcolor="COD5FC" height="371" valign="top"> 

<form method="post" action onsubmit="return false ;"> 

<table width="100%" border="0" censpacing="2" cellpadding= 2 > 

<tr> , ^ . .j-„ 

<td colspan="2"> <b><font face="verdana, AriaT , Helvetica, sans-senf 
si2e="2"><b><img src="grfx/paybycheck.gif" width="98" height="100" 
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donate„form.asp 

align-"left"></b><br> 
<br> 
<br> 
<br> 

I would like to make a Donation to <font size="4" color="#FFFFFF"> 
<%=sName%></font> by. . .</font></b></td> 
</tr> 

^^<td width="40%'* aliqn='Viqht" bgcolor="#6666FF"><font face="verdana, 
Arial, Helvetica, sans-serif" size="2%<b>Check</b></font></td> 
<td width-"60%" bgcolor="#6666FF"> </td> 
</tr> 

"^^Sd width="40%" aligns" right" bgcolor="#8888FF"><font face=:"verdana, 
Arial, Helvetica, sans-serif" size="2 '><b>Credit 
Card</b></font></td> 
<td width="60%" bgcolor="#8888FF"> </td> 
</tr> 
<tr> 

<td width-"40%" align=" right" vaOign="top" bgcolor="#AEAEFF"><font 
face=" Verdana, Arial, Helvetica, sans-seriff"= size="2"><b>Mail</b></font></td> 

<td width="60%" bgcolor="#AEAEFF"> <b><font face-"Verdana, Anal, 
Helvetica, sans-serif" size="2"> 
</td> 

</tr> 

^^<td width="40%" align="riqht" valign="top" height="5"></td> 

<td width="60%" height="5%</td> 
</tr> 
<tr> 

<td width="40%" align="right" valign="bottom" height="5" 
bqcolor="#999999"><font face=" Verdana, Arial, Helvetica, sans-serif" 
si ze="2"><b>Amount</b></font></td> 

<td width="60%" height="5" bgcolor="#999999"> 

<input type="text name="textfield"> 
</td> 
</tr> 
<tr> 

<td width="40%" align=" right" valign="bottom" height-" s;^ 
bgcolor="#ADADAD"><font face="verdana, Arial, Helvetica, sans-serif 
size="2"><b>Name</b></font></td> 

<td width="60%" height="5" bgcolor="#ADADAD"> 

<input type="text name="textfield2"> 
</td> 
</tr> 

^^<td width-"40%" align="right" valign-"bottom" height="5" 
bgcolor="#BEBEBE"><font face="verdana, Arial, Helvetica, sans-senf 
size="2"><b>Address</b></font></td> 

<td width="60%" height="5" bgcolor="#BEBEBE"> 

<textarea name="textf i el d22"></textarea> 
</td> 
</tr> 
<tr> 

<td width-"40%" align="right" vali gn="bottom" height="5" 
bgcolor="#CECECE"><font face=" Verdana, Arial, Helvetica, sans-senf" 
size="2"><b>Email 

Address</b></font></td> 
<td width="60%" heiqht-"5" bgcolor="#CECECE"> 

<input type="text name="textfield23"> 
</td> 
</tr> 
<tr> 
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<td width=:"40%" align=:"right" valign="bottom" height=:"5" 
bQColor="#E2E2E2"><font face="verdana, Arial, Helvetica, sans-senf" 
sTze="2"><b>Phone 

No</b></font></td> 
<td width="60%" height="5" bgcolor="#E2E2E2"> 
<input type="text name="textfield232" size="3"> 
<input type="text" name="textfield2322" size="3"> 
<input type="text" name="textfield2323" size="4"> 
</td> 
</tr> 

<tr align="center"> 

<td colspan="2" valign="bottom"' height="5"> . 

<input type="submit" name=:"Submi t" value="Please Accept Donation 
</td> 
</tr> 
</tabl e> 
</form> 

</td> V . 

<td width="20" bgcolor="C0D5FC">&nb5p;</td> 
</tr> ^ \ 

^^<td width="20"><img src= 'grfx/pop_corner3 .gif " width="20" height="20"></td> 
<td width="74" bgcolor=:"C0D5FC"> </td> 
<td width="486" bgcolor-"COD5FC% </td> . 
<td width="20"><img src="grfx/pop_corner4.gif" width-"20 height= 20 ></td> 
</tr> 
</tabl e> 
</body> 
</html> 
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<%& Language=VBScript %> 

<HTML><HEAD><TlTLE>Online Donations for Candidates</TITLE> 

<!-- #INCLUDE file="inc/top_inc.inc" — > 

<td> 

<META content="MSHTML 5.00.2920.0" nanie=GENERATOR></HEAD> 

<BODY>&nbsp ; &nb5p ; &nbsp ; </TD><td cl ass="normal "> 

<form name="forml" action="donate_confi rm.asp" method="post"> 

<p align=" center "xbxfont size="4"><U>PARTY/CANDIDATE COMMITTEE ACCOUNT SET-UP 

FORM</u></font> </b></p> 
<p><b>Organi zati on inf ormati on ; </b> 
<br>Plea5e enter the name and address of your 

organization :<br> 

Name of Organization: 

<input name="Name_of_Organization" size="50" > 
<br> 
</p> 

<p>Type of Organization (please check those that apply): <br> 

<input type=" radio" name="Type„of_Organization" 
val ue=" Presi denti al_Candi date_Comnii ttee_CNo_Federal_Matchi ng) "> 

Presidential Candidate Committee (No Feder;^! Matching) <br> 

<input type=" radio" name="Type_of_Organitzation" 
val ue=" Presi denti al_Candi date_commi ttee„(Federal„Matchi ng) "> 

Presidential Candidate Committee (Federal Matching) <br> 

<input type=" radio" name="Type_of„Organization" 
val ue="Federal„Candi date„commi ttee_(non-presi denti al ) "> 

Federal Candidate Committee (non-presidential) specify office & state: <br> 

<input name="office" > 

<input name="state" > 

<input type=" radio" name=:"Type_of_Organization" value="state_Candidate_committee' 
State candidate Committee - specify office & state: <br> 
<input name="office" > 
<input name="state" > 

<input type=" radio" name="Type„of_Organization" val ue=" Local „Candidate.Committee' 

Local candidate Committee - specify office & jurisdiction: <br> 

<input name="office" > 

<input name="state" > 

<br> 

<input type=" radio" name="Type„of_Organization 
val ue="Nati onal^Pol i ti cal_Party„(Federal_Account) "> 

National Political Party (Federal Account) <br> 

<input type=" radio" name="Type_of„Organization" 
value="National„Political„Party„(Non-Federal_Account)"> 

National Political Party (Non- Federal Account) <br> 

<input type=" radio" name="Type„of_Organization" 
val ue="State_Pol i ti cal„Party_(Federal_^ccount) "> 

State Political Party (Federal Account) - specify state: 

<input name="state" > 

<br> ^ . . „ 

<input type="radio" name="Type_of_Orgam zati on 
val ue="state„Pol i ti cal_Party_(Non-Federal^ccount) "> 

state Political Party (Non-Federal Account) - specify state: 
<input name="state" > 

<input type=" radio" name=:"Type_of„organization" value="Other_Political_Party"> 
other Political Party - specify: 
<input name=" Party" > 

<input type=" radio" name="Type_of„Organization" value="Unincorporated"> 
unincorporated (specify additional information) <br><TEXTAREA cols=60 
name=unincorporated rows=3 wrap=viRTUAL></TEXTAREA> 
<br> 
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Street Address: 

<input name="Name_of_OrganizationlO" > 

<br> 

City: 

<input nanie="Address_City" > 

<br> 

State: 

<input name="Address„state" > 
zip: 

<input name="Addr€SS_zip" size="10" > 
<br> 
</p> 

<p><b>Contact Information: </b><br> 

Please enter the information below for the organization's mam contact person: 

<br> 

Name: 

<input name="Contact_Name" > 
E-Mail: 

<input name="Contact_E-lviail" > 
<br> 

Phone: f 

<input name="Contact_Phone" > 

Fax: 

<input name="Contact_Fax" > 
<br> 
</p> 

<p><b>web Site Contact information: </b> <br> 

Please enter information below for your main web site contact person :<br> 
Name: 

<input name="web„Site„Name" > 
E-Mail : 

<input name="Web_Site_E-Mail" > 

<br> 

Phone: 

<input name="Web_Site„Phone" > 
Fax : 

<input name="Web_Site„Fax" > 
<br> 

<p><b>Total Annual Fundraising Revenue from All Sources :</b> <br> 

Please indicate the appropriate range below :<br> c^.,r..nc- 
<input type="radio" name="Total^nnual_Fundraising„Revenue_f rom^ll_sources 

value="$0 - $999,999% 

$0 - $999,999 <br> , ^ n . 

<i nput type=" radi o" name-"Total^nnual„Fundrai si ng_Revenue„f rom_An_Sources 

value="$lM - $9.99M"> 

$1M - $9.99M <br> ^ ^ 

<i nput type=" radi o" name="Total^nnual_Fundrai si ng_Revenue„f rom^l l_Sources 

value="over $10 M"> 

over $10 M <br> 
</p> 

<p><b>Primary Donation Area information</b> <br> 

(note: if you wish to have a secondary donation area, please make a copy of 
pages 2 - 5 of this form, fill them out, and indicate secondary): <br> 
Web Address to which to map the eContributor donation area :<br> 

WWW- 

<input name="Web^ddress" > 

If'^your site has multiple pages, what page, colors, design elements do you most 
want the eContributor donation area to emulate: <br><TEXTAREA cols=60 
name=Name_of_organization23 rows=3 wrap=vlRTUAL></TEXTAREA> 
<br> 
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<p><b>Bank information</b> <br> 
Bank Name: 

<input name="Bank_Name" > 
<br> . 
Bank Account Name (exact name on account) : 
<input name="Bank_Account„Name" > 
<br> . , 

City and State in which the account was opened: <br> 
<input name="City_in_which„the_account„was_opened" > 
<input name="State„in„which_the_account_was_opened" > 
<br> 

Bank Account # for Deposits: 
<input name="Bank_Account" > 

secondary Bank Routing Number (Bank ABA Routing Number) 
<input name="Secondary_Bank_Routing_Number" > 
<br> 

<p><b>Donation Area Functionality Desired </b><br> 
<input type=" radio" name=="Donation_Area_F!ificti^" 
value="Corporate„ONLY_Donation_j\rea"> \ 

- Corporate ONLY Donation Area i 
<input type=" radio" name="Donation_Area_Functi 

- EPolling <br> 

<input type="radio" name="Donation_Area_Functi 
val ue="Cont ri buti ons„by-Credi t„card"> 

- contributions by Credit card 
<input type=" radio" name="Donation^rea_Functi 

- EVolunteer <br> 

<input type=" radio" name="Donation^rea_Functi 
val ue="Contri buti ons_by_eCheck"> 

- Contributions by eCheck 

<input type=" radio" name="Donation_Area„Functional 
val ue="Targeti ng_E-Mai 1 "> 

- Targeting E-Mail <br> ^ . n • 
<input type=" radio" name="Donati on^rea_Functi onal ityjesi red 

value="Ask_occupation/Employer„from_Contributor"> 

- Ask occupation/Employer from Contributor <br> 
</p> 

<p><b>contribution Message</b> <br> ^ "^^^o.^-;.-^ 
<input type=" radio" name="Contnbution_Message value= generic > 

- generic: "How much would you like to contribute. <br> 

<input type=" radio" name="Contribution_Messaqe value- custom > ^^^^^^^^ 

- custom: "HOW much would you like to contribute to (specify) <br><TEXTAREA 
col 5=60 name=Contribution_Message rows=3 wrap=VIRTUAL></TEXTAREA> 

<br> 
</p> 

<p><b>Donation Amounts Listed</b> <br> ^ ^-^^^ i^^^^a'^^ 

<input type="radio" name="Donation_^mounts_Li sted ^ value= no_options_li sted > 

- no options listed beyond $10 minimum (donor fills in amount) <br> 
<inDUt tVDe=" radio" name="Donation^mounts_Listed value= options_n sted > 

- options listed (up to seven - ex., 25/50/100/200/500) <br> 
<input type=" radio" name="Donation_Amounts_Li sted 

val ue="speci f i c_amount_opti ons "> 

- specific amount options 

<input name="specific„amount_options" > 
<br> 
<input 

- list 
<input 

- list 

<p><b>Contribution Acknowledgement Message</b> <br> 
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Please write the text of the acknowledgement that you would like to appear in 
the email sent to a donor after making a contribution. (Please attach a second 
page if the space below is not sufficient). <br><TEXTAREA cols=60 
name=Contri buti on^cknowl edgement^Message rows=3 wrap=viRTUAL></TEXTAREA> 

Email address the acknowledgement should come from (if different from contact 
person's email): <br> , n . ^ » 

<i nput name=" Emai l„address„the„acknowl edgement_shoul d„come_rrom > 

<br> 
</p> 

<p><b>ePolling Demographic Questions </b><br> ^ 

choose 3 of the following stock demographic questions; indicate the order you 
would like then to be :<br> 

<input type=" radio" name="ePolling„Demographic_Questions 
val ue=*'what_i s_you r_age"> 

Q: what is your age? <br> ^ . ^ u 

a: (18 - 24,25 - 34,35 - 44,45 - 54,55 - 64,65 or Older) <br> 

<input type="radio" name="ePolling_Demographic_Questions 
value="what_is_your„gender"> 

Q: What is your gender? <br> 

a: (Male, Female) <br> t ^ , . 

<input type="radio" name="ePollina DemographicQuestions 
val ue="what_i s_you r„mai n_raci al_bacKground"> 

Q: what is your main racial background? <br> . , . • ■ 

a: (White/Caucasian, Black/African American, Hispamc/Latino, Asian/Asian 

American, 

other) <br> , , . . „ 

<input type="radio" name="ePollinq„Demographic_Questions 
val ue=" what_was_you r_l ast„g rade_of _r o rmal ^educati on "> 

q: what was your last grade of formal education? <br> . n ^ u i 

A: (Less than high school, High school graduate, Some college/Vocational school, 

college Graduate, Post Graduate) <br> . 

<input type=" radio" name="ePolling_Demographi c_Questions 
val ue="Are_you_a_regi stered_voter"> 

Q: Are you a registered voter? <br> 

A: (Yes, no) <br> , . . „ 

<input type=" radio" name="ePolling„Demographic_Questions 
val ue="Do_you_.consi der_yoursel f "> 
Q: Do you consider yourself... <br> 

A: (very Liberal, somewhat Liberal, Moderate, Somewhat Conservative, Very 
Conservative) 

<br> . ^ ^ , 

Primary Donation Area information (cont.) <br> 

</p> . . 

<p><b>Custom demographic questions </b><br> ^ ia Ar. 

Please write below custom demographic questions that you would like in your 
system. This must be limited to two questions in the form of a statement the 
user can select if it pertains to them, such as: I am a member of the ACLU. 

<br> 
1. 

<input name="Custom_demographic_questions01" 5ize="50" > 
<br> 

<input name="Custom_demographic„questions02" size="50" > 
<br> 
</p> 

<p><b>Question of the day </b><br> ^ c-^^^u 

Please write your question of the day (you can choose from any of the stock 
demographic questions or your custom demographic questions). <br><TEXTAREA cois=bU 

name=Question_of_the„day rows=3 wrap=viRTUAL></TEXTAREA> 
<br> 

</p> 

<p><b>Contribution Alerts</b> <br> 
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You can set a contribution alert in your eContributor donation area, contribution 

at or over the amount you specify will generate an automatic notice to you and 

a special acknowledgement to the donor. <br> 

contribution alert limit - $ 

<input name="Contribution„alert„limit" > 

<br> , _ 

Contribution alert acknowledgement message <br><TEXTAREA cols=:60 
name=contribution_alert_acknowledgement_message rows=3 wrap=vlRTUAL></TEXTAREA> 

Email address the contribution Alert acknowledgement should come from (if 
different 

from contact person's email): <br> 

name""Email_address_the_contribution_^lert„acknow > 

<br> 
</p> 

<input type="submit" name="submitl" value="SJubmit"> 
</form> 

<p><b> \ 
<center> \ ' 

Questions or Requests? 
</center> ^ . . . ^ • . ^ ^• 

</b> <b>If you have questions about completing this form, or wish to discuss 
ways in which you think your eContributor donation area could be more effective, 
please call econtributor client Services at 703-837-8643, or e-mail to 

cl i ents@econt ri butor . com . 
<br> 
</b> 

<p></p> 

<p><b></b> 

<center> 

<p>powered by: „ , 

<br><lMG src="grfx/econtributor. jpg" width="200"></p><! — #include 
file="inc/bottom_inc.inc" --> 
</center></BODY></HTML> 
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<%& Language=VBScript %> 

<!-- #include file="inc/session„timeout .inc" --> 

<!— #include file="inc/top_inc.inc" --> 

<td> 

<td align="middle"><%'Code start%> 

<form method="post" name="forml" action="donate_list .asp" 

onsubmit="return false; "> 

<TABLE border=0 cellPadding=l censpacing=l width= 98% > 

<TR> . . -, ^ . 

<TD colspan="3" xfont size="3" face="verdana, Anal, Helvetica, 
sans-serif "><b>search Contributors</b><BR> 

<font size="r'>Leave the fields blank to get all 
records</font></font><BR><BR></TD> 
</TR> 

<TR> . ^ ^ . 

<TD width="15%"><font size="2" face="verdana, Anal, Helvetica, 
sans-serif "><b>Date</b></font></TD> , ^ ^ . 

<TD width=:"25%"><font size="r face="Verdana, Anal, Helvetica, 
sans-serif *'>Start Date CMM/DD/YY)</font><BR>; <INPUT name=sdate 
value="<%=date%>"></TD> . „ . . ^ r. ^ 

<TD><font size="l" face=" Verdana, An^l,^ Helvetica, sans-serif >End Date 
(MM/DD/YY)</font><BR> <INPUT name=edate valEie="<%=date%>"></TD> 
</TR> 

<TR> . , , . 

<TD><font size="2" face="Verdana, Anal, Helvetica, 
sans-serif "><b>Amount</b></font></TD> 

<TD colspan-"2"><lNPUT name-zipcode></TD> 
</TR> 

<TD><font size="2" face-" Verdana, Anal, Helvetica, 
sans-serif"><b>zip-code</b></font></TD> 

<TD colspan="2"><INPUT naine=zipcode></TD> 

<TR><td colspan="3" align="center"><BR><input type="button" name-"buttonl" 
value="Back" onclick="hi story. backO"> 

<input type=" submit" name=^'submi tl" value-"Search ></td></tr> 

<i niput^name=ref type=hi dden val ue="document . 1 ocati on= ' donate_search .asp * "> 
</form><!-- #include file="inc/bottom„inc.inc" --> 
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FONT-SIZE: 18px; 
FONT-FAMILY: Verdana, Arial 
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electionman .ess 

BODY 

FONT- FAMILY: Anal 

} 

TD.topnav 

FONT-SIZE: lOpx; 
color: white; 

FONT-FAMILY: Verdana, Arial; 
TEXT- DECORATION: none 

TD. copyright 
{ 

FONT-SIZE: lOpx; 
COLOR: black; 
FONT-FAMILY: Verdana 

TD.toplink 

FONT-SIZE: lOpx; 

COLOR: white; f 
FONT- FAMILY: Arial 

} 

TD. normal 

FONT-SIZE: llpx; 
FONT- FAMILY: Verdana, Arial 

} 

TD. color 

FONT-SIZE: llpx; 
color: white; 

FONT-FAMILY: Verdana, Arial 

} 

SELECT 

FONT- SIZE: lOpx; 
FONT-FAMILY: Verdana, Arial 

} 

TD.topnav A 

FONT- size: lOpx; 
COLOR: navy; 
TEXT-DECORATION: none 

} 

TD . dodo 

FONT-SIZE: 9px; 
COLOR: #213ba7; 
FONT-FAMILY: Verdana, Arial; 
TEXT-DECORATION: none 
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} 

TD. forms 

FONT- SIZE: smaller; 
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<%& Language=VBScript %> 
<%Response . Buf f er=True%> 
<htm1> 
<head> 

<title>Email Maintenance </title> 

<script language=:"3avascript" src="src/utils, js"></script> 
<script language="JavaScript"> 

function CheckltC) { ... 

sSellndex = document .formS. delete! ist.selectedlndex; 

svar = string(document.form3.de1etelist.options[sSe1index] .value) ; 

sArr = svar.splitC'-"); .... 

sListvar = "Are you sure you want to permanently delete list : + sArr[lJ 

II "pii , 

ifCsSel index == 0) { 

alertC'Please select a list"); 
return false; 

else if (confi rmCsListvar)) 
return true; 

else 

return false; 

} 

function checkFormQ { . r 

if (document. forml.li St. selectedlndex == 0) { 
alertC'Please select a list"); 
return false; 

} 

} 

f unction. cjheckFormZQ { n ^ lln■^ r 

if (trim(document.form2.new_l 1st. value) == ) i ^ 

alertC"- Please enter name for the list.\n ); 
document . f orm2 . new_l i st , focus () ; 
return false; 
} 

} 

</script> . . 

<!-- #include file="inc/session_timeout.inc --> 

<!— #include file="inc/top_inc.inc" --> 

<td align="center"> 

<%'code start%> 

<!-- #include file="inc/database. inc --> 
<!— #include file="inc/Listcode.inc" --> 

<table border="0" cell Paddi ng="2" cellspacing^' 2 
width-"85%" align="center"> 

<TR><td colspan="2"> 

<font face="verdana, Arial, Helvetica, sans-serif 

color=:"#092186" size="4"> , , . , 

<B>Emai 1 Mai ntenance</f ont><b></td></tr> 

Sd\lign-"left" bgcolor="#cOd5fc" colSpan="2"> , 
<font face="verdana, Arial, Helvetica, sans-serif size= 2 

<i Start Form 1 

></font> 

<form action="maintain.asp" method="post" name="forml" 

onsubmit=" return checkFormQ "> . ^ , . 

<font face="verdana, Anal, Helvetica, sans-serif 

size="2"><b> , . y 

List Maintenance</b></font> </td></tr> 

<tr> 

<td bgcolor="#D9E6FD" colSpan="2"><select name="list"> 
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<%=sList%></select> . 
<input name="submitl" type="submi t" value="Go"> <ront 
face=" Verdana, Arial, Helvetica, sans-serif" size="l> /^^^^^ 

Select a list to add/del ete/import email addresses</font> 

^1 End Form 1 

> 

</td></t rx/f o rm> 

<tr><! Start 

Form 2 ^ 

<form action="addlist.asp" method="post" name-"form2" 

onsubmit="return checkForm20"> ^ ^ ^ . ^ . 

<td bgcolor="#cOd5fc" colSpan="2"><font face="verdana, 

Arial, Helvetica, sans-serif" size-"2"><b> 

Create your own list</b></font></td></tr> 

<td^bgcolor="#D9E6FD" colSpan="2"><input maxLength-"40" 

name="new_list"> „ , . ,. », u -^i. i "/-^" 

<input name="submit" type="submit" value= Go > . 
<font face="verdana, Arial, Helvetica, sans-senf size= 1 
Enter a name to create your own custom list</font> 

^1 End Form2 

> 

</t dx/t rx/f 0 rm> 

^Xr><\ Start Form 3 

<form action="deletelist.asp" method="post" name="form3" 
onsubmit="return ^heckitO ; "j^^^^^^^.,^^^^^^^., ^^^^p,,^..^..,,^,,, face="verdana, 

Arial, Helvetica, sans-serif" size="2"xb> 

-.^ Delete li st</bx/fontx/tdx/tr> 

<trxtd bgcolor="#D9E6FD" colSpan="2"> 
<select name="deletelist"> 

<%=sList%x/select> „ 
<input name="submit" type="submit value= Go > ^ 
<font face-"verdana, Arial, Helvetica, sans-senf size= 1 
select a list to delete</font> 

End Form3 

> 

</td></t rx/f o rm> 

<trxtd align="center" col span- 2 > 
<form name=:"frm_back"> 
<input type="button" name="buttonl 
oncl i ck="document . 1 ocati on= ' def aul t . asp ' " val ue="Back"> 

</form> 

</tdx/tr> 

</table> 

<!-- #include file="inc/bottom„inc.inc" --> 
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<%@ Language=VBScript %> 
<h™l> 

<HEAD> 

<ti tl e>Empl oyment</ti tl e> 
<!-- #INCLUDE file="inc/top_inc,inc" --> 
<td>&nbsp ; &nbsp ; Anbsp ; </td><td cl ass="normal "> 
<!-- #INCLUDE file="inc/employment.inc" --> 
<!— #INCLUDE file="inc/bottom„inc.inc" --> 
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<CENTER> , 
<TABLE border=0 ce1lPadding=0 cellSpacing^O width=600> 

<TBODY> 
<TR> 

<TD align=right vAlign=top width=128><A href="http : //www excite. com"><lMG 
alt-Excite border=0 height=50 src=-"/img/a_new_banner.gif width=128></A> </TD> 

<TABLE border=0 cellPadding^O censpacing=0 width-"100%"> 

<TBODY> 

<TR> 

<TD height=31 vAlign=:bottom width=552><FONT face=arial , geneva size=4><B>sign 

I n </ B></ FONT></TD></TR> 

<TR> 

<TABLE border=0 cell Padding=l censpacing=:0 width="100%"> 
<TBODY> 

<TR bgcolor=#ffccOO> 

<TABLE border=0 ce1lPadding=0 censpacing=0> 

<TBODY> 

<TR> 

<TD></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR> 
<TR> 

<TD> </TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE> 

<TABLE border=0 cellPadding=0 cellSpacing^O width=600> 

<TBODY> 

<TR> 

<TD> </TD></TR></TBODY></TABLE> 

<TABLE border=:0 cellPadding=:3 censpacing=0 width=:620> 

<TBODY> ^ 

<TD aligrt=middle rowSpan=2 vAlign=top width=230> ^ . 

<TABLE bgColor=#cccccc border=0 cellPadding-l ce11spacTng=0 wTdth=230> 

<TBODY> 
<TR> 

<TABLE bgColor=#ffffcc border=0 cenPadding=l censpacing=0 width="100%"> 
<TBODY> 

<'rR> . , 

<TD bgcolor=#ffcc00> <FONT face=anal ,geneva><B>we Icome 

sachendra I </b></font></td></tr> 

<TR> 

<TABLE border=0 cellPadding^S cellSpacing^O width="100%"> 
<TBODY> 

<TR> . n . 

<TD co1Span=2><FONT face=geneva,anal size=-;2><A ..•^p.^^.-^^.o^^nri 
h ref = Vmps/1 ogi n?pname=pl anne r&amp ; pst r=Exci te+Pl anne r&amp ; brand=xci t&amp ^ 

http%3A%2F%2Fpl anner . exci te . com%2Faddress%2F&amp ; nof n 1 1=1 >I 
am not sachendra</A></FONT> </td></tr></tbody></table> 

<TR> 

<TABLE border=0 cellPadding-3 cellspacing=0 width="100%"> 

<tbody> 

<TR> 

<TD align=right> 

act?on=/mps/l ogi nreq?pname=pl anner&amp ; pst r=Exci te+Pl anner&amp ; brand=xci t&amp ; target 
url=http%3A%2F%2Fpl anner . exci te , coni%2Faddress%2F&arnp ; sel ect=l 
method=post name=logi nbox onsubmit=" return DauthO"> 

<TD align=right vAl i gn=top><FONT face=geneva,arial size=-l><B>Member 
Name : </B></FONT></TD> 
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<TD vAlign:=top> sachendra<lNPUT name=acctname type=hidden value=sachendra> 
</TD></TR> 

<TR> ^ . T 

<TD align=right vAlign=center><FONT face=geneva,anal 
size=-l><B>Password:</B></FONT></TD> . ■ -.^ ^ 

<TD vAlign::=center><lNPUT maxLength=20 nanie=passwd size=12 type=:password 
value=""> </TD></TR><lNPUT name=snonce type=hidden value=gzs2Arg8cYKRCa> <INPUT 
name=stime type=hidden value=3945B731> <INPUT name= time skew type=hidden 
value=none> <INPUT name=crep type=hidden value=none> <INPUT name^jerror 
type-hidden value=none> 
<TR> 

<TD><FONT^face=geneva,arial size=-l><lNPUT name=gofer type=5ubmit value="sign 

in"></FONT></TD></TR></FORM></TD></TR></TBODY></TABLE></TD></TR> 

<TR bgColor=#ffffcc> 

<TD> </TD></TR> 

<TD bgSloir=#ffccOO> <FONT face=arial ,geneva><B>Help</B></FONT></TD></TR> 
<TR bgCo1or=#ffffcc> 

<TABLE border=0 cellPadding^S censpacing=0 width="100%*'> 
<TBODY> 

<TR> ... 

<TD><FONT face=geneva,anai size--l><A . o u ^ 

href = Vmps/hel p/si gn_i n_hel p?pname=pl anner&amp ; pst r=Exci te+Pl anner&amp ; brand=xci t&am 

p;targeturl=http%3A%2F%2Fplanner. excite. com%2Faddress%2F&select=l >Get 

hfeVhW^^^^^ vate^profi 1 e/?pname=pl anner&amp ; Pst r=Exd ann 

er&brand-xci t&targetur1=http%3A%2F%2Fplanner. excite. com%2Faddress%2F&^^^ 

ect=l">Member 

<TD rowSpan=2 width=5> </TD> 

<TD vAlign=top> <font face=arial ,helvetica><B>welcome to Excite 

Planner</B></FONT><BR> ^ -n^ - n -^^-i. "inno/"^ 

<TABLE bgcolor=#ffcc00 border=0 cellPadding^O cellSpacing-O width= 100^ > 

<TBODY> 
<TR> 

<TD height=3> . ^ 

<TABLE border-0 cellPadding^O censpacing=0> 

<TBODY> 
<TR> 

<TD></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE> 

<P> 

<TABLE border=0 cenPadding=2 ce11spacing=0 width="100%"> 

<TBODY> 

<TR> 

<TD colSpan=2><FONT f ace=ari al>You are about to add data to your Excite 

Planner :</FONT> </TD></TR> 

<TR> 

<TD colSpan=2 height=8></TD></TR> 

<TR> 

<TD aliqn=riqht vAlign=top width="5%"> • </TD> u 
<TD width-"95%"><FONT face=geneva,arial size=-l>lf you are an Excite member, 
enter your member name and password Cto the left). Once you've signed in you 11 
arrive at your Excite Planner and the contact or event you selected will be 
entered in your Planner. </FONT></TD> 

<TR> 
<TR> 

<TD height=4></TD></TR> 
<TR> 

<TD alian=riqht vAliqn=top> • </TD> ■ u 

<TD><FONT face=geneva,arial size=-l>lf you are not an Excite Member, sign up 
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now! Once you've signed up, you'll arrive at your Excite Planner and the contact 
or event you selected will be entered in your Planner. 

</ FONT> </TD></TR></TBODY></TAB L Ex/ P></TD></TR> 

<TR> . . • L. 

<TD colSpan=2 vAlign=bottom><FONT face=geneva,anal size=-l><B>Signed up in the 
past?</B> Your Excite Member Name and Password work for <A 
href="http://freelane. excite. com/freelane/">FreeLane</A> and all other Excite 

products . </FONT> </TD></TR></TBODY></TABLE> 
<P> 

<HR noShade SIZE=1 width=600> 

<FONT face=geneva,arial size=-2><A .... / ^ ■ o 

href="http://www. excite. com/privacy_policy/">Pnvacy Statement</A>. copyright © 

1995-2000 Excite Inc. All rights reserved. <A 

h ref =" http : //www . exci t e . com/i nf o/di scl ai me r/">Di scl ai me r</A></FONT> </ CENTER> 



<SELECT name=State> <0PTI0N selected value=0>— Select--<0PTI0N 

val ue=AL>Al abama<OPTiON val ue=AK>Al aska<OPTlON val ue=AZ>Ari zona<OPTiON 

val ue=AR>Arkansas<OPTlON val ue=CA>Cal i forni a<OPTlON val ue=CO>Colorado<OPTlON 

val ue=CT>Connecti cut<OPTlON val ue=DE>Del aware<OPTlON val ue=FL>Fl on da<OPTiON 

val ue=GA>Geo rgi a<OPTION val ue=Hl>Hawai i <0PTI0N val ue=lD>ldaho<OPTlON 

val ue=iL>ll 1 i noi s<OPTiON val ue=iN>indi ana<OPTiON val ue=lA>lowa<OPTiON 

val ue=KS>Kansas<OPTiON val ue=KY>Kentucky<OPTlON val ue=LA>Loui si ana<OPTION 

val ue=ME>Mai ne<OPTlONl val ue=MD>Maryl and<OPTiON val ue=MA>Massachusetts<9PTlON 

val ue=Mi>Mi chi gan<OPTlON val ue=MN>Mi nnesota<OPTION val ue=MS>Mi ssi ssi ppi <OPTION 

val ue=MO>Mi ssouri <0PTI0N val ue=MT>Montana<OPTlON val ue=NE>Nebraska<OPTiON 

value=NV>Nevada<OPTlON value=NH>New Hampshi re<OPTlON value=ND>New Jersey<OPTlON 

value=NM>New Mexi co<OPTlON value=NY>New York<OPTION value=NC> 

North carol ina<OPTION value=ND>North Dakota<OPTiON value=OH>ohio<OPTiON 

val ue=OK>okl ahoma<OPTION val ue=OR>Oregon<OPTlON val ue=PE>Pennsyl vam a<OPTiON 

value=Rl>Rhode lsland<OPTlON value=SC>South Carol ina<OPTlON value=SD> 

south Dakota<OPTION value=TN>Tennessee<OPTION value=TX>Texas<OPTlON 

value=:UT>Utah<OPTiON value=VT>vermont<OPTiON value=VA>Vi rgi ni a<OPTiON 

val ue=WA>Washi ngton<OPTiON val ue=wv>west vi rgi ni a<OPTiON ^ 

val ue=wi>wi sconsi n<OPTlON val ue=WY>Wyomi ng<OPTlON val ue=DC>Washi ngton 

D.C.<0PTI0N value=GU>Guam<OPTlON value=PR>Puerto Rico</OPTlON></SELECT> 
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eyard_adverti se . asp 

<%@ Language=VBScri pt %> 

<HTML> 
<HEAD> 

<title>Advertise with us</title> 
<!-- #INCLUDE file="inc/top_inc.inc" — > 
<td><!— #INCLUDE file="inc/advertise.inc" --> 
<!-- #INCLUDE file="inc/bottom_inc.inc" --> 



O 
C 

m 
m 
m 
m 

Q 

m 

Q 
H 
O 

y 

P 
u 



Page 1 



forgot„pa5s.asp 

<%@ Language=VBScript %> 
<%Response . Buf f er=True%> 
<html> 
<head> 

<title>Forgot your Password?</title> 
<!— #include file="inc/topJnc.inc" --> 

<td align="center > 

<%*code start 

if Request. Form("email") = then%> , 
<form action="forgot_pass.asp methods post id= formZ 



name="form2"> 

size="-l">Email 
below, and click 



<tab1e border="0" cellPadding="2"> 
<tbody> 

<td^colSpan-"3"><font face="Arial, Helvetica, sans-serif" 
yourself your password. <br>Simply enter your email address 



"Send Password&quot ; 
<p>lf you are not already an eYardSngn member, then please 
<a href="register.asp">sign 

up now</a> 

<p>&nbsp ; </p></b></f ontx/tdx/t r> 
<td><b><font face="Arial, Helvetica, sans-senf 

size="-l">Your Email 

Address : </f ont></td> 

<td><input name="email"></td> ^ 

<td align=:"left"><input type="submit" value=^Send Password 
id="submit2" name-"submi t2"></td></tr></td></tr> 

^td^colspan="3"><font face-"Arial , Helvetica, sans-serif" 

size="-2">  <p>(otherwise, <a href="default .asp">go back</a> to the home 

"^^^^^ </td></tr></table></form><br><br><br><br><br><br> 

<%else%> , . „ 

#include file="inc/database.inc --><% 
set rsl ^ server. createObject("ADODB. Recordset ) 

sSQL = "Select username, password FROM user_info 

WHERE email = + Request . Form("email ") + 

rsl. open sSQL,db 
if rsl. EOF then 

Response. write "Sorry, we could not locate 

your email address<BR>" . „ . . 

^ Response.wnte <BR>Click <a 

href=' javascript:history.backO '>here</a> to try again" 

else 

sBody = "Your username is: " + rsl(O) + 

"^^^^^^ sBody = SBody + "Your password is: " + 

rslCl) + vbcrlf+vbcrlf 

sBody = sBody + "Enter this password on the 

login screen along with your username:" + vbcrlf . „, . . 

^ ^ sBody = sBody + "http://www.eyardsigns.com/ 

+ vbcrlf 

set DMail = 

Server . CreateObjectC" DMai 1 . SMTPMai 1 ") 

'This IS my local SMTP server 
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"mai 1 hub . regi steredsi te . com" 



size="-l"><b>Your password was 
href="defau1t.asp*'>here</a> to log in, 



forgot_pass.asp 

JMail .ServerAddress = 

'This is me 

3Mail. Sender = "pas swordC&eyardsi gns.com" 
jMail -Subject = "eYardSign Password" 

jMai 1 . AddReci pi ent Request . FormC"emai 1 ") 

JMail -Body = sBody 
JMail .Priority = 3 
'Send it. . ■ 
DMail .Execute%> 
<br><br><br> 

<font face="Arial, Helvetica, sans-serif" 
just emailed. 

<p>When it arrives, click <a 



</b></font></center></p><br><br><br><br><br 
<%end if 

rsl. close : set rsl = nothing 
db. Close : set db = nothing 

end if%> 

<!-- #include file="inc/bottom_inc.inc" --> 
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global, asa 
<SCRIPT LANGUAGE=VBScript RUNAT=server> 

'You can add special event handlers in this file that will get run automatically 

when . , ,-. 

•special Active Server Pages events occur. To create these handlers, just create a 

'subroutine with a name from the list below that corresponds to the event you want 

^use. For example, to create an event handler for Session_OnStart , you would put the 
'following code into this file (without the comments): 

'Sub Session_OnStart 
'"'*Put your code here 
'End Sub 

'EventName Description . -,- ^. 

'Session_OnStart Runs the first time a user runs any page in your application 

'Session„OnEnd Runs when a user's session times out or quits your 

application ^ . . ^ 

'Application_OnStart Runs once when the first page of your application is run tor 
the first time by any user 

'Application_OnEnd Runs once when the web server shuts down 

</SCRIPT> 
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<%@ Language=VBScript %> 

<html > 

<head> 

<ti tl e>HeadQuarters</ti t1 e> 
</head> 

<!-- #include file="inc/convGrt_trackid.inc" --> 

<!-- #include file="inc/database.inc" --> 

<% set rs = server. CreateObjectC'ADODB. Recordset") 

sSQL = "Select First_Name, Last_Name from Mail_Tracking WHERE track_id = " + 
sTrack_id 

rs. open 55QL,db ^ , 

if not rs.EOF then sName = rs(0) + " " + rs(l) end if 

rs .Close 

SSQL = "SELECT a.url, b. National„URL , c.State_URL, b. party FROM userjnfo AS 

a, party AS b, " + _ . . „ 

"State„URL as C where a.user_id = " + suser_id + AND a.party_id = 

b-party_id " + „ . , . .„ 

"AND a.state_id = c.state_id AND a.party^id - c.party_id 

rs.open sSQL,db 

if not rs.EOF then 

sCandidate_HP = rs(0) . . ^.i^ ^ 

if sCandidate_HP = "" then sCandidate_HP = "javascnptralertC Dont 
have a website! ')" 

sNational„URL = rs(l) 

sState_URL = rs(2) . ^, 

if sState_URL = "" then sState_URL = "javascript :alert( Dont have a 



webs'irer')" 
else 



sParty = rsC3) 

sState_URL = "javascript: alert ('Dont have a website!')" 
sNational_URL = "javascript:alert('Dont have a website! ) 



'Get Candidate URL 

rs. Close . . „ ju 

rs.open "SELECT url from user_info WHERE user^id = + sUser_id,db 
sCandidate_HP = rsCO) . -, ^^.^^ ^ 

if sCandidate_HP = "" then sCandidatejP = "javascript :alert( Dont 

have a website! ')" 
end if 

SSQL = "UPDATE Mai l_Tracki ng SET Number_Headquarters = Numberjeadquarters 
+ 1 WHERE track_.id = " + sTrack^id 
db. Execute sSQL 

rs. close : set rs = nothing 
db. Close : set db = nothing 

%> 

<body bgcolor="#092185"> _ ,.^„ ^. „ 

<table width="600" border="0" censpacing="0" cellpadding="0' align= center > 

<tr> 

<td width="17" a1ign="right"><lMG height=20 src="grfx/pop_cornerl.gif" 
width=20></td> 

<td bgcolor="#cOd5fc" width="74"> </td> 

<td bgco1or="#cOd5fc" width="486"> </td> ^ 
<td width="18" align="1eft"><lMG height=20 src="grfx/pop_corner2.gTf 
wi dth=20></td> 
</tr><tr> 

<td width="20" bgcolor="#cOd5fc"> </td> ^ . „ . 

<td width="74" bgcolor="#cOd5fc"><a href="http: //www. eyardsigns.com ximg 
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src="grfx/eyard_imgl.gif" border="0" width="70"></a></td> 
<td width="486^ bgcolor="#cOd5fc" align="middle"> 

<%set ad = Server. createObjectC'MSWC.AdRotator") %> 

<%= ad.GetAdvertisement("inc/adrot_lng.txt") %> 

</td> 

<td width="20" bgcolor="#cOd5fc"> </td> 

^^Jtd^width="20" height="3" bgcolor="#cOd5fc"><lMG height=l 
src="grfx/b1uespacer.gnf" width=l></td> 

<td width="74" height="3" bgco1or="#cOd5fc"><IMG height=l 
src="grfx/bl uespacer.gif" width=l></td> u ■ u , 

<td width="486" height="3" bgcolor="#cOd5fc"><lMG height=l 
src="grfx/b1 uespacer.gif" width=l></td> .... 

<td width="20" height="3" bgcolor="#cOd5fc"><lMG height=l 
s rc="g rf x/bl uespacer . gi f " wi dth=l></td> 
</tr><tr> , , , 

<td width="20" bgcolor="#cOd5fc"> </td> ^ 
<td width="74"><lMG height=20 src="grfx/logo_half .gif width=74></td> 
<td width="486"><IMG height=20 src=''grfx/1 ogo_half2.gif wi dth=60></td> - 
<td width="20"> </td> 
</tr><tr> , , 

r-i <td width="20" bgcolor="#cOd5fc"> </td> „ „ , „ n.. 

<td co1span="2" bgcolor="#cOd5fc" height="37r' valign="top" class= normal > 

El <table width="100%" border="0" censpacing="2" ce11padding="2"> 

iO <tr align="middle"> ... >, ^ /i. jt -j:.. 

m <td valign="top" align='neft"><lMG height=64 src= grfx/head2.gif 

e'S wi dth=64></td> 

= s <td va1ign="middle" align="center"> . 

P <font face="verdana, Anal, Helvetica, sans-serif size= 5 

m c6lor='^#bb0OOO"> 

^ <b><%=sName%></font></b></td> „ , 

i„ <td align="right" > <a href="<%=sNational_URL%>"><iMG border= 0 

= width=70 src="grfx/<%=sParty%>.gif" ></a></td> 
y </tr> 

n <tr align="middle"><td colspan="3"><BR> 

m <tabl e> 

O ^ <td xfont face="verdana, Arial, Helvetica, sans-serif" 

f- sTze= 2 ><b> href="<%=sNational_URL%>">National 
Headquarters</a></b></font></td> 

</tr> 

<td><font face="verdana. Anal, Helvetica, sans-serif 

<a href="<%=sState_URL%>">state 
Headquarters</b></font></a></td> 

</tr> . , ^ . 

<tr><td xfont face="verdana, Anal, Helvetica, 

sans-serif size- 2 ><b> href="<%=sCandidate_HP%>"><%=sName%>' s 

HomePage</a></b></f ontx/ td> 

</tr> 
</table> 

<BR><BR><BR><BR><BR> ^ . , , 

<a href="javascript:window.clo5e() >close window</a> 

</td></tr> 
</table> 

</td> . , , 

<td width='70" bgcolor="#cOd5fc"> </td> 

^^<td^width="20"><IMG height=20 src="grfx/pop_corner3.gif " width=20></td> 
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<td width="74" bgcolor="#cOd5fc"> </td> 

<td width="486" bgcolor="#cOd5fc"> </td> ^ /.^ 

<td width="20"><lMG height=20 src="grfx/pop„corner4,gif width=20></td> 
</tr> 

</tabl e> 

</body> 

</html> 
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import. asp 

<%& Language=VBScript %> 

<%Response.Buffer=True%> 

<html> 

<head> 

<title>select Mail Client</ti tle> 

<!-- #inc1ude file="inc/session_timeout .inc --> 

<!-- #include file="inc/top_inc,inc" --> 

<td align="center"><%'Code start%>^ „.^^o/h 
<table border="0" cenpadding-"0" censpacing=:"0" width="100%% 

<td width-"25"><imq height^"!" src=Vhtml/blank.GiF" width="25></td> 
<td bgCo1or="#ffffff" aTign="center"><font face="Arial, Helvetica, sans-senf 
si ze~"" - 1"> 

  <b>eYardSi gns.com can import addresses from the following 
sources:</b><br>  <font size="-2"> 

Please Note: Only primary Email addresses can be imported at this 
time.</font></font></td> 
<td width-"25"><img height="r src=Vhtml /blank. GIF 
width="25"></td></tr></table><br> 

<table align="center" cellpadding= 4 > 
<t r > 

<td bgcolor="#cOd5fc"><font face="Arial, Helvetica, sans-serif" 
size-"2"><B>Desktop lmports</b></font></td> „ . ^ ^. 

<td bgcolor="#cOd5fc"><font face="Arial, Helvetica, sans-serif 
size="2"><B>Web-Based import s</b></font></td> 

<td vAlign="top"></td></tr> 

^^<td vAlign="top" bgcolor="#D9E6FD" class="normaV'> 

<%sList = replaceCRequest.QueryString("list") ","+")%> 
:^-V: ^ <a href="doimport.asp?client=l&list=<%=sList%> ximg 
src="grf9e/outl ookicon.gif" border="0" WIDTH="19" HEIGHT="18"> 

Microsoft Outlook</a> <br> - „, „ . 

<a href="doimport.asp?client=2&list=<%=sList%> ><img 
src="grfx/neweyard„outlook.gif" border="0" wlDTH-^18" HEIGHT= 19 > 

Microsoft outlook Express</a><br> . „ . 

<a href="doimport.asp?client=3&list=<%=sList%> ximg 
src="grfx/palmicon,gif" border="0" width="19" height="18"> 

Palm Desktop</axbr> ^. . „ ■ 

<a href="doimport.asp?client=4&list=<%=sList%> ximg 
src="grfx/neweyard__netsacpe.gif" border="0" width="19"> 

Netscape Mail client</ax/fontx/p> 

<p> </p></td> 
<td vAlign="top" bgcolor=:"#D9E6FD" class="normal > 
<font face="Arial, Helvetica, sans-serif" si ze="r> (Coming 
soon) </f ont><BR> 

Yahoo<BR>Lycos<BR>Excite<BR></td> 
<td vAlign="top"x/td></tr> 
<tr> 

<td align="center" colspan="4"> 

<form name="forml"> . , t ^ 

<input name="submit" oncl ick="hi story .backQ ; return (fal se) ; 
type="Button" value="Back"> 

</f ormx/tdx/t rx/tabl e> ^. _ . 

<!-- code end #include 
file="inc/bottom__inc.inc" --> 
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<%© LanguagG=VBScript %> 

<HTML> 

<HEAD> 

<ti tle>Import status</ti tle> 

</HEAD> 

<BODY> 

<% 

'Open Database in read only mode 
set onn = server. createobjectC'ADODB. Connect! on") 
set rs = server. createobjectC'ADODB. Recordset") 



sScriptDir = server .mappath("sachin.csv") 
sScriptDir = strReverse(sScriptDi r) „x„x^ 
SScriptDir = Mid(sScriptDi r , instrCl, sScriptDir, \ )) 
SScriptDir = StrReverse(sScriptDi r) 

onn. open "DRlVER={Mi crosoft Text Driver (*,txt; *.csv)} 

rs.open "Select * FROM [sachin#csv] " , onn 

Do until rs.EOF 

'Netscape Mail - rsC6) 
'Outlook - rs("E-Mail Address") 
'outlook Express - rs("E-Mail Address") 
'Palm Desktop - rsC8) 

Response-write rs(8) + "<BR>" 
rs.MoveNext 
Loop%> 

~<78bDV>" - 
</HTML> 
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<html> 
<head> 

<tit1e>Welcome to netboxes.com</title> 
<script language="JavaScript"> 
function checkFormC) { 

errorFields = 

if (trimCdocument.forml. user. value) == { 
errorFields Enter User NameAn"; 

} 

if (trimCdocument.forml. pass. value) == "") { 
errorFields += Enter Password. \n" ; 
} 

if (MsEmailValidCdocument.forml. email .value)) { 

errorFields += Enter a valid email address in the form 

xxx@xxx.xxx.\n"; 

} 

if (errorFields != "") { . ^ • u u 

errorFields = "Please correct the following errors, then resubmit 
the form. Thank you.\n\n" + errorFields; 

alert(errorFields) ; 

return false; 

} 

else { 

return true; 

} 

</scriptr* ^ 

<script language="3avascript" src="src/utils.]s ></scnpt> 

</head> 

^table^2idth=^^^ cellspacing="0" cellpadding=:"0" height="100%"> 

<tr align="middle"> 

^ <form name-"forml" action="l.asp" method="post" onsubmit=" return checkForm()% 
<table width=:"760" border="0" cellspacing="0" cenpadding=' 0 > 
<tr bgcolor="#ffdcl9" align="middle"> 

<td height="192"> „ „ _ 

<table width="300" border="0" censpacing="2" cellpadding= 2 > 

^^<td valign="bottom" width="150% , ^ ^ , 

<div align="right"><font face=" Verdana, Anal, Helvetica, 
sans-serif" size="r color="#000000"><b><font 
size="2">username</font></b></font></div> 
</td> 

<td width="150"> 

<input name="user"> 
</td> 
</tr> 

^Ktd valiqn="bottom" width="150"> . ^ ^ . 

<div align="right"><font face="verdana, Anal, Helvetica, 
sans-seri f " si ze="2" col or="#000000"><b>password</b></f ontx/di v> 
</td> 

<td width="150% 

<input type="password" name="pass"> 
</td> 
</tr> 
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<tr> 

<td valiqn="bottom" width-"150"> 

<div align="right"><font face="Verdana, Aria1, Helvetica, 
sans-seri f " si ze="2 " col or="#000000"><b>Emai 1 </b></f ontx/di v> 
</td> 

<td width-"150"> 

<input name="email"> 

</td> 
</tr> 
<tr> 

<td colspan="2"> 

<div align="center"><br> ^ . . „ 

<input type="submit" name^"Submi t" value="Subrmt > 
</div> 
</td> 
</tr> 
</table> 
</td> 
</tr> 
<tr> 

<td></td> 
</tr> 
<tr> 

<td height="65"> . . , . 

<div align="center"><font face="Verdana, Anal, Helvetica, sans-senf 

color="#000000" size="2"><b> 

For employment / advertisment / more info email at <A 
h ref ="mai 1 to : i nf oSwearethesol uti on . com">i nf o@wearethesol uti on . com</A></b></ f ontx/di 
v> 

</td> 
- ■ " " </tr> 
— ' <tr> 

<div align="center"><font face="verdana, Arial , Helvetica, sans-serif" 
size= '1" color-"#000000"><b>This 

site is designed and maintained by <A 
h ref ="mai 1 to : tech@wearethesol uti on . com">@wearethesol uti on , com</A></b></f ontx/di v> 
</td> ' 
</tr> 
</table> 
</form> 

</td> 
</tr> 
</table> 
</body> 
</html> 
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list. asp 

<%@ Language=VBScript %> 
<%Response . Buf f er=True%> 
<HTiVlL> 
<HEAD> 

<ti tl e>Li st</ti 1 1 e> 

<!-- #include file="inc/session„timeout .inc' --> 
<!-- #INCLUDE file="inc/top_inc.inc" --> 
<!— #inc1ude file="inc/database.inc" --> 
<td class="forms" align="center"> 

<% 

suser„id = Session("user") 
sFileName = sUser^id + "_impadd.txt" 
filename = "upload\" + sFileName 

'Create and Write to a File 
sScriptDir = 

StrReverse(Server.mappath(Request.ServerVariables("PATH_INFO"))) . 

SScriptDir = Mid(sScriptDi r , lnstr(l, sScnptDir, \ )) 
SScriptDir = strReverse(sScriptDi r) + filename 
sServerfilename = sScriptDir 

set up! = server. CreateObjectC'SoftArtisans.Fileup ) 
upl.saveAs sScriptDir 

iclient = upl . Form("client") 
Listvalue = upl . FormC'list") 
sArr_List = split(Listvalue,"-") 
sList_Name = sArr_List(l) 
sList_id = sArr„List(0) 

set onn = server. createobject("ADODB. Connection") 
^ ^ server. createobjectC"ADODB. Recordset") 



P SScriptDir = sServerfilename 

%J SScriptDir = St rReverse(sScriptDir) , ^ ^ 

^ SScriptDir = MidCsScriptDi r , inStrd, sScnptDir, \ )) 

SScriptDir = strReverseCsScriptDi r) 

onn. open "DRlVER={Microsoft Text Driver (-.txt; -.csv)}; 



DBQ="&sScri ptDir 
"]", onn 



rs.open "select - FROM [" + replaceCsFileName, ".","#") + 

'Netscape Mail - rs(6) 
'Outlook - rs("E-Mail Address") 
'Outlook Express - rs("E-Mail Address") 
'Palm Desktop - rs(8) 
Select case iclient 
case 1,2: 

rsNum = "E-Mail Address" 

case 3: 

rsNum = 8 

case 4: 

rsNum - 6 

End Select 

DO until .rs.EOF 

if not rs(rsNum) = "" then 

SSQL = "INSERT INTO email 

(email, user_id,list_id) values ('" + _ ^ ^ „ ^ . . „ „ . ■ ^ 

rs(rsNum) +"',"+ suser_id + + sList.id 

+ ")" 

db. Execute sSQL 
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end if 
rs.MoveNext 

Loop 

'Delete duplicate entries 

'<!-- #include file="inc/delete„duplicate.inc" —>%> 
<% 

rs. Close : set rs = nothing 
db, Close : set db = nothing 
onn. Close : set onn = nothing%> 

<form name="forml" action="maintain.asp" method=:"post"> 
<input name="list" type="hidden" 

val ue="<%=Li stval ue%>"> 

</form> 
<BR><BR><BR> 

YOU successfully imported Email Addresses added to <B><font 
col or= ' 092186 ' ><%=sLi st„Name%> 

</B></font> <BR><BR> 

<a 

h ref =" j avascri pt : document . f orml . submi t () ">Conti nue . . . </A></f ont> 
<!-- #INCLUDE file="inc/bottom_inc.inc" 
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login. asp 

<%@ Language=VBScript %> 
<%Response . Buf f er=True%> 
<html> 
<head> 

<ti tl e>Loqi n</ti tl e> 

<!-- #include file="inc/top_inc.inc" --> 

<!— #inc1ude file-"inc/database.inc" --> .^^.v 

<td align= centerXfont face=' Verdana, Anal 

size="2"><BR><BR> 

<%*Code start 

if not Session("time_out") = then sMsg - Your Session 

has timed out" else sMsq = "if you are a registered user"%> 

has timed out ^{|g^f J9^^^^„^Qy,^„ cellpaddTng="2" censpacing="l"><tr><td 

align="center" colspan."2"> ^^^.^ Request .Form("user") ^ "" 

then%> _ ,,4: 

<fortn name= formi 

action="login.asp" methocl="post"> 

<font face="verdana" size="2"><b> 

<%=sMsg%>, Sign in be1ow</font></b></td> 

^ <tr> 

<td width="50%" 

a1ign="right"><font face="verdana" size="2">user Na^e^</font>^, </td>^ 
type="text" name="user" size="20"></td></tr> 

<tr> 

<td a1ign=" right" xfont 
face="verdana" size="2">Password </font> </td> ^^.^^^^ name="pass" 

type= 'password" size="20"></td></tr> ^^^^ 

<td colspan="2" align="center 

xfont face="Ariar' size="2"> . "c-Mhmni-i ■• 

<input id= submitl 

name="submitl" type="submit" value="Login"x/fontx/td> 

</trx/table> 

<br><tab1e width="100%" border="0 
censpacing="l" cenpadding="2" > ^^^^^^^ a1ign="center"> 

<a 

href="forgot_pass.asp?ref=<%=Request.QueryString("ref")%>"xfont face="verdana" 
size="2"><b>Forgot your password?</fontx/bx/a> 

<input name="ref" type="hidden" 
va1ue="<%=Request.QueryString("ref")%>"> </tdx/trx/form> 

<tr> 

<td align="center"xfont 
face=" Verdana" size="2"><bxi>if you are a new user, register 
below</fontx/b></ix/tdx/tr> ^^^^^^^ align="center"> 

<a 

href=" regi ster . asp?ref=<%=Request . QuerySt ri ng("ref ")%>"><f ont f ace="verdana 

size="3"><strong>New user Registration 

^ </strong></font> 

</a> 

</td> 

</tr> 

<%else 

set rs = 

server . Createobject ("adodb . Recordset") 
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SSQL = "select user_id from 

user info where username = + Request . FormC"user") + _ . n. 

' and password = + 

Request. FormC'pass") + 

rs.Open sSQL,db 
if rs.EOF then 

Response. write 

"<B><font face- 'Verdana* size='2'>lnvalid Login, try again. <BR>Click " + „ 

<a 

href-'iavascript: hi story. back()'>here</a> to go back to login screen. </font></b>" 
^ else 

SessionC'user") = 

cstrCrsCO)) 

Request. Formrref") = then sRef = "default .asp" else sRef - Request .Form("ref") 
Response. Redirect(sRef) 

'Clean up 

rs. close : set rs=nothing 
db. Close : set db=nothing 

end if%> 
</table> 

<!— code end --> file="inc/bottom„inc.inc" — > 
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<%@ Language=VBScript %> 
<%Response. Buffer = true%> 

<HTML> 

<META NAME="GENERATOR" Content="Mi crosoft Visual studio 6.0"> 

</HEAD> 
<BODY> 

<%sessionC'user") = 

Response . Redi rect "def aul t . asp"%> 

</BODY> 
</HTML> 
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maintain. asp 

<%@ Language=VBScript %> 
<%Response . Buf f er=True%> 
<html> 
<heacl> 

<title>Maintain List</title> 
<scri pt 1 anguage=" JavaScri pt"> 
<! — 

function CheckAllC) { 

for (var i=:=0;i<document.forml. elements. length;i++) 

var e = document .forml. elements [i] ; 
if (e.name != 'all box') 

e, checked = document. forml. all box. checked; 

} 

} 

function DeletePromptQ { 
var j=0; 

for (var i=0;i<document. forml. elements. length;i++) 

var e = document. forml. el ements [i ] ; 
if (e. checked && e.name=='checkl') 

ifCj>0){ ^^^^1^.^^ ^ „^^^ y^jj g^^g ^^^^ PERMANENTLY \n delete " + 

String(j) + " checked E-Mail address(es)?" ; 

i f (conf i rm(svarl i st)) 

document. forml. submit C) ; 

else 

return false; 



else 



} 



alertC'No email addresses have been selected'); 
return false; 



function MoveEmails(ivar) { 
if(ivar==0) 

document . f 9rml . moveemai 1 s . val ue=document . f rm_move . moveemai 1 s . opti ons [document . f rm„mo 
ve . moveemai 1 s . sel ectedlndex] . val ue ; 
else 

document . forml . moveemai 1 s . val ue=document . f rm jovel . moveemai 1 s . opti ons [document . f rm_m 
ovel . moveemai 1 s . sel ectedlndex] . val ue ; 
document . forml . submi t () ; 

} 

function checkFormQ { r 
if (!isEmailvalidCdocument.form2.add_email .value)) i 

alert("Enter a valid email address in the form xxx@xxx.xxx.\n ); 

return false; 

} 

} 

//--> 
</script> 

<script languaqe="3avascript" src-"src/utils.3S ></scnpt> 
<!-- #include file="inc/session_timeout.inc --> 
<!-- #include file="inc/top_inc.inc" --> 
<!-- #include file="inc/database.inc" --> 
<td align="center"> 
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maintain. asp 
<%'Code start 

sList = Request. Form("li St") 
sArr_List = split(sList , "-") 
sList„Name = sArr_ListCl) 
sList_id = sArr_List(0) 
sUser_id = SessionC'user") 

set rs = server. CreateObjectC'ADODB, Recordset") 
set rsl = server. CreateObject("ADODB. Recordset") 
set rs2 = server .createObjectC'ADODB -Recordset") 

'Get All Lists for this user 

sSQL = "Select a.list„id,a.list_name FROM list AS a, 

user_list__link AS b WHERE " + „ _ - u^ 

"a.list_id - b.list^id and (b.user„id = " + sessionC user ) 

+ " OR b,user_id = 1) order by a.list^name" 

rsl-Open sSQL,db 
do until rsl. EOF 

sSQL = "SELECT COUNTC'O FROM email WHERE user_id = 
+ Session("user") + " AND list_id = " + cstrCrsl(O)) 

rsZ.Open sSQL.db 

sNumber - " C" + cstr(rs2(0)) + ")" 
rs2. Close 

sListnames = sListnames + "<0PTI0N value= + 
cstr(rslCO)) + + rsl(l) + "'>" + rsl(l)+ sNumber + "</0PTI0N>" 

rsl.MoveNext 

loop 

SListnames = "<0PTI0N value='" + sList+ "'>-select 
List-</OPTlON>" + SListnames 

'Move Email Addresses to Diffrent List 
— if not trim(Request.FormC"moveemails")) = "" then 

if not Request. Form("checkl") = "" then 
sArr_List_Move = 

splitCRequest.FormC"moveemails") ,"-") , . 

sMovetoListID = sArr_List„Move(0) 

sEmail_id = 

replace(Request.Form("checkl"),", "," or email_id = ") 

. SSQL = "UPDATE email SET list_id = + 

sMovetoListiD + " WHERE (email.id = " + sEmail„id + ")" 

db. Execute sSQL 

end if 

'Add Email Address to List 

elseif not Request. Form("add_email") = "^ then 

SSQL = "SELECT COUNT(*) FROM email WHERE user_ld = 

+ suser_id + _ list_id = " + sList.id + " AND email = '" + 

Request. Form("add_email") + "'" 

rsl. Close 
rsl-Open sSQL,db 
if rsl(O) > 0 then 

Response. Write "<SCRIPT 

Language='DavaScript'>" . „ ^ ^. , . ^ ,_ 

Response. Wnte "alert("This Email address 

already exists in this list. ') ;" , ^ 

Response. Wnte "</SCRiPT> 



else 

(email ,user_id,list_id) VALUES ('" + 
+ "," + sList„id + ")" 



SSQL = "INSERT INTO email 

Request. Form("add_email") + "'," + sUser_id 

db. Execute sSQL 
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maintain. asp 
end if 

bAdd_Flag = true 
'Delete Email Addresses 

elseif not Request. Form("checkl") = then 

sEmail_id = replace(Request . Form("checkl ), , 

sSQL = "DELETE FROM email WHERE email^id = " + 

db. Execute sSQL 
end if%> . „ 

<table border="0" width="98%" cellspacing="r 



<tr align="left" bgcolor="#cOd5fc"> 
<td colSpan="2"><font face="verdana, Arial, Helvetica, 
sans-serif" size="4"><b>List : <%=sList_Name%></b></font></td></tr> 

<tr align="middle" vAlign="bottom"> 

<td align="center" width-"50%"> „ 

<a href="import.asp?list=<%=replace(sList," > 




Outlook, Netscape and Pali 

click above to upload personal email addresses from your 
Desktop</font> 

</td><td align= center > 

<b><font face="verdana, Arial, Helvetica, sans-serif 

size= z > , , -T 

<! Form Add Email Address 

> ^ 

<form name="form2" method="post" action="maintain.asp 

onsubmit:^"return checkFormQ ; "> ^ . . m -t" 

Add Email Address </font></b><br><input name= add_emai 1 > 
<input name="submitl" type="submit" value="Add"> 
<input name-"list" type="hidden" val ue-"<%=sLi st%>"><br>^^ ^ 
<font face=" Verdana, Arial, Helvetica, sans-senf" size= 1 
Enter an email address to add to list 

<b><%=sList_Name%></b></font></form> 

<[ End Form Add Email 

> 

</f ontx/tdx/t r> 
</tabl e> 

<table border="0" width-^98%" cellspacing^"!" 
cellpadding="0" align="center"> 

<tr><form id=form3 name=form3> 
<td><input name="deletel" type="button" value= Delete 
one! i ck=="j avascri pt : Del etePrompt () "> 

</td></form> 

<td><form name="f rm_move" method="post" 

acti on="mai ntai n . asp"> 

<input type^"button name= button3 value= Move to... 
onclick="javascript:MoveEmailsCO)"> o/ / -i ^ i^a 

<sel ect name="moveemai 1 s"><%=sLi stnames%></sel ect></td> 
<input name="list" type="hidden" 

val ue="<%=sLi st%>"></f orm> 

<td align="right"> . „ . . 

<form name="frm_list" method="post" acti on-"mai ntai n. asp 
<input type="submit" name="button3" value="Go to..."> 
<sel ect name="l i st"><%=sLi stnames%></sel ect></td></tr> 
</tr></form> 

<form name="forml" method="post' 
acti on="mai ntai n. asp" onsubmit="return Del etePrompt (); "> 

<tr><td colspan="3" heights" 5"></tr> 
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<tr bgcolor="#ffdcl9"> 
<td bgcolor="#cOd5fc" width="5%" align="center > 
<input type="checkbox" name^^'allbox" 

onClick="checl<AnC)"> „ ^ _ ^ 

</td><td bgcolor="#cOd5fc" colspan-"2"><font 
face="Verdana, Aria!" si ze="2"><b>Emai 1 Addre5S</b></font></td> 

</tr> 

<% 

sSQL ^ "Select email_id, email from email where list_id = " + _ 
sList_id + " AND userjd - " + sUserJd + " order by emai I 
rs.Open sSQL,db 

if rs.EOF then n x i 

Response.wri te "<tr><td colspan="3 angn= left 
bgcolor=#D9E6FD><font face=' Verdana, AriaV size=l >No email addresses have been 
added to this li st</font></td></tr>" 

else 

do until rs. EOF 

iRowinc = iRowinc + 1 
Response. write "<TR>" 
Response.wri te "<td bgcolor=#D9E6FD 
align=' center 'xinput type=' checkbox' name='checkl' value='" + cstr(rs(0)) + 

^ Response, write "<td bqcolor=#D9E6FD 

colspan="2'><font face=' Verdana, AriaV size='2'>" + rs(l) + ;</font></td>" 

Response. write </TR> 
rs.MoveNext 

loop 

end if 

- - : - "Clean Up 

— rs. close : set rs = nothing 

db. Close : set db = nothing %> , 
<input name="list" type-"hidden" value="<%=sList%> > 
<input name="moveemails" type="hidden"> 
</form> 
<%if iRowinc > 14 then%> 
<tr><td colspan="3" height="5"></tr> 
<tr><form> 

<td colspan="l"> . „ n 

<input name="deleter type="button" value=' Delete 

oncl i ck=" j avascri pt : Del etePrompt Q "> 

</td></form> , ,^ 

<td><form name="frm_movel" method^ post 

action="maintain.asp"> „ „. ^„ n„^„^ 

<input type= button" name= buttons value= Move to... 

onclick="iavascript:MoveEmailsCl)"> . y n ^ /^j 

''^^ ^ ^ ^sel ect name="moveemai 1 s"><%=sLi stnames%></sel ect></td> 

<input name="list" type-"hidden" 
value="<%=sList%>"></form> , 

<td align=" right > . „ 

<form name="frm_listl" method=:"post 

action="maintain.asp"> „ , . „ ..u on 

<input type= submit" name="button3 value= Go to... > 
<sel ect name="l i st"><%=sLi stnames%></sel ect></td></tr> 
</form> 
</tr> 

<%end if%> 
<t rxtd col span=" 3 ">&nbsp ; </td></t r> 
<tr><td colspan="3" align="center"><form> 
<input name="buttonl" type="button" value- Back 
onclick="wi ndow. location. href=' email maintenance. asp* "> "rrno-^o nv.rHc-inn" 

<input name="button2" type="button" value= Create eYardSign 
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oncl i ck="document . 1 ocati on= * desi gns . asp ' "> 

</f 0 rmx/ tdx/t r> 
</tabl e> 

<%if bAdd_Flag then ^ ■ , „ 

Response-Write "<script language^ Davascript > 
Response. Write "document.form2.add_email . focus () ; 
Response. write "</script>" 

end if%> 

<!--'code end #include file="inc/bottom_inc.inc — > 
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<%@ Language=VBScript %> 

<HTML> 
<HEAD> 

<title>Management Team</tit1e> 
<!-- #INCLUDE file="inc/top_inc.inc" --> 
<td>&nbsp ; &nbsp ;&nbsp ; </td><td cl ass="normal "> 
<!-- #INCLUDE file="inc/management.inc" --> 

<!-- #INCLUDE file="inc/bottom_inc.inc" --> 
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movemails.asp 

<%@ Language=VBScript %> 
<%Response . Buf f er=True%> 
<htm1><head> 

<title>Move mails to List</title> 
<!-- #include file="inc/top„inc.inc" --> 
<!__ #include file="inc/database.inc" --> 
<td align="center"> 

<%'Code start ^ 

sList = Request. FormC'movemai is ) 

sArr_List = splitCsList , 

sList„Name = sArr_List(l) 

sList„id = sArr_ListCO) 

suser_id = SessionC'user") 

sTable = Request. Form("table") 

sRef = Request. FormC'ref") 

sTrack_id = Request. Form("id") 

set rs = server. createObjectC'ADODB. Recordset") 

if STable = "sendtof reind" then ... 

sSQL = "select b. email FROM sendtof reind^referer a 

sendtofreind_email5 b WHERE a.track„id = " + u nr\" 

sTrack„id + " AND a.referer_id = b.referGr_id 

^^^^ SSQL = "select email FROM " + sTable + " WHERE 

track_id = " + sTrack^id 

end if 

rs.open 5SQL,db 
'Add Email Address to List 
- ' ■ ^ do until rs.EOF 

SSQL = "INSERT INTO email (email ,user_id,nst_idj 

VALUES C" + „ ^^^^^ ^ ^ ^ ^ sList_id + 

db. Execute sSQL 
rs.MoveNext 

loop%> 

<!-- #include file="inc/delete_duplicate.inc" 

<% 

rs. Close : set rs = nothing 
db. Close : set db = nothing 

<p align="center"><font face="Verdana, Arial, Helvetica" 

Emails added to List : <%=sList_Name%><BR><BR> 
<a h ref ="<%=sRef%>?i d=<%=sTrack_i d%>">Conti nue . . . </a> 
</font></p> 

<!--'code end 

#include file="inc/bottom_inc.inc --> 



size="2"> 
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<%@ Language=VBScript %> 

<HTML> 

<HEAD> 

<title>Political News</title> 

<!-- #INCLUDE file="inc/top_inc.inc" 

<td>&nbsp ; &nbsp ; &nbsp ; </td><td> 

<!-- #INCLUDE file="inc/news.inc" --> 

<!-- #INCLUDE file="inc/bottom_inc.in 



personal.htm 

<HTML> 

<ti tl e>Personal Li st</ti tl e> 

<BODY> 

<P><font face="Helvetica, Verdana, Aria!" size= '2"><B>Personal List</b> - A list 
which you may create and upload unlimited email _ . 

addresses to. This list acts like a Personal Distribution List 

which you may 

add/delete at your convenience. </P> 
<p aliqn="center"> . . / / 

<a href="javascript:window.closeO >Close wi ndow</a></p> 

</BODY> 
</HTML> 
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postcard. asp 

<%@ Language=VBScript %> 
<%Response - Buf f er=True 
simage=Request . QuerySt ri ng ("i mage")%> 
<htmT> 
<head> 

<title>Design your eYardSign</title> 
<script language="DavaScript"> 
function checkFormO { 

errorFieids — 

if (trimCdocument.forml-s_fname. value) ""\'t„ 
errorFieids += Enter a First NameAn ; 
} 

if (trifn(document.forml.s_l name. value) == "") { 
errorFieids += Enter a Last Name.\n ; 
} 

if (trimCdocument.forml.s_position. value) == 

errorFieids += Enter your Position. \n ; 
} 

if (!isEmailvalid(document.forml.s_email .value)) { 

errorFieids += "- Enter a valid email address in the form 

xxx@xxx.xxx.\n" ; 

} 

if (trimCdocument.forml. subject. value) == "") { 

errorFieids += "- Enter subject for email. \n ; 

_ } 

4f (trimCdocument. forml.s_title. value) == "")„{ 
errorFieids += Enter your Title. \n ; 
} 

if (trimCdocument.forml. message. value) == 

errorFieids Enter your Message. \n ; 

} 

if CerrorFields "") { . - 

errorFieids = "Please correct the following errors, then resubmit 

the form. Thank you.\n\n" + errorFieids; 

alertCerrorFi elds) ; 

return false; 

} 

else { 

return true; 
} 

} 

<scri pt^l anguage-" Javascri pt" src="src/uti 1 s . j s"></scri pt> 
<!__ #include file="inc/session_timeout.inc --> 
<!-- #include file=;;inc/top_.inc.inc" --> 

<td ^^''"'9f=^|joP^>^^^^„p^ ACTION="copy%20of%20sendmail.asp" name="forml" 
encType="multi part/form-data" onsubmi t="return checkFormO"> ^ 

<table width="98%" align=:"center" border="0" cellspacing= 1 
cellpadding="2"> 

^^<td colspan-"4" align="center" bgcolor="#FFFFFF"><img 
src="grfx/yard<%=simage%>.gif"></td> 
</tr> 
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^*<td colspan="4" aliqn="center" bgcolor="#FFFFFF"> 
<hr size="l" width="100%" noshade> 
</td> 
</tr> 

^ <td colspan="4" bgcoTor="C0D5FC"> . , 

<font face="verdana, Arial, Helvetica, sans-senf size= 4 > 
<b>STEP 2 : eYardsign Personalization Form</b></font> 
</td> 

</tr> 

^^<td width="200" align="left" bgcolor="#D9E6FD"><b><font face="verdana, 

Arial" size="2">First . ^ „ . ■ t, • .-i.. • 

Name </b></font><font face="verdana, Anal size= 1 ><i>(of 

Candidate)</i></font></td> , „ 

<td width="150" align="left" bgcolor="#EDF3FE"> 
<input size="15" name="s_fname" maxlength=' 40 
onbl ur="docunient . f orml . s_l name . focus () "> 

<td^Jolspan="2" rowspan="6" bgcolor="#EDF3FE" align=;;center;' _ 
class="forms"> <font face="verdana, Arial, Helvetica, sans-senf size= 1 > 

<textarea cols="25" name="message" rows="9" 
wrap="PHYSiCAL"></textarea><br> 

tiirmessage you would like to send the recepient(s)</font><br> 
<i— <INPUT TYPE= "BUTTON" VALUE= "Spell Check" onclick= var 

f=document.formi; dospell C'en', f. message, document. location. protocol + // + 

document. location. host + '/cgi-bin/sproxy.cgi , true); >— > 
</td> 

^^^<td width="200" align="left" bgcolor="#D9E6FD" class="forms"><b>Last 
Naffle</b></td> , „ , „ 

<td width="150" align="left" bgcolor="#EDF3FE"> 

<input size="15" name="s_lname" maxlength= 40 > 
</td> 
</tr> 

^^<td width="200" align="left" bgcolor="#D9E6Fp"><b><font face="verdana, 
Arial" size="2">office</b></font><font face="verdana, Anal size= 1 ><i> (Max. 
length - 40)</i><br> ^^^^^ face="verdana, Arial" si ze="l">(for example Mayor or 
Treasurer) </font></td>^^^,. bgcolor="#EDF3FE"> , 

<input size="15" name="s_position" maxlength= 40 > 
</td> 
</tr> 

^^<td width="200" align="left" bgcolor="#D9E6FD" nowrap valign="middle" 

class="forms"><b> . „ , ^ 

Return email address</b></td> 
<td width="150" align="left" bgcolor="#EDF3FE"> _ 

<input size="15" name="s_email" maxlength= 40 > 
</td> 
</tr> 

<td width="200" align="left" class="forms" bgcolor="#D9E6FD" nowrap><b> 
Subject of email </b></td> 

<td width="150" align="left" bgcolor="#EDF3FE"> 

<input size="15" name="subject" maxlength= 40 > 
</td> 
</tr> 
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<tr><td bgcolor="#D9E6FD"><font face=" Verdana, Anal 

size- 2 > <b>Title</b> </font><br><font face="verdana, Aria!" size="l">Cfor 
example Midwest Region or Alameda County) </font></td> n^„„^u n.^,. 

<td bgcolor="#EDF3FE"><input size="15" name="s_tTtle" maxlength= 40 
onbl ur="document . fortnl. message . focus () "></td></tr> 

^<td align="left" colSpan="2" nowrap height="5"></td> 
<td align="left" colSpan="2" noWrap height="5"> 

^^^""^ <tr><td align="left" bgcolor="C0D5FC" colSpan="2" 

nowrapxfont face="verdana, Arial, Helvetica, sans-serif" sTze="2"><b>OPTiON 1 : 
<font size="l">select a logo</font></b></font></td> 

<td align="left" bqcolor="C0D5FC" col5pan="2" nowrapxfont 
face="verdana, Arial, Helvetica, sans-serif" size="2"><b>OPTiON 2 : <font 
size="l">Upload your logo</font></b></font></tr> 

^^<td colspan="2" align="center" bgcolor="#D9E6FD" nowrap> - 

input type="radio" name="s_logo" value="grfx/donkey.gif checked> 
img src=^grfx/donkey.gif" width="50" height="40"> 



<1 
<i 
<i 
<i 
<i 
<i 
<i 
<i 
<i 
<i 
<i 



nput type=" radio" name="s_logo" value="grfx/el ephant.gif > 
mg src="grfx/el ephant.gif" width="50" height="40"> , 
nput type=" radio" name="s_logo" value="grfx/republic.gif > 
mg src="grfx/republic.gif" width="49" height="40"> <br> 
nput type=" radio" name="s_logo" value="grfx/democratl.gif > 
mg src="grfx/democratl.gif" width="50" height="40"> 
nput type="radio" name="s_logo" value="grfx/capitol .gif > 
mg src='^grfx/capitol.gif" width="43" height=''52"> , 
nput type="radio" name="s_logo" value="grfx/Dudge.gif > 
mg src="grfx/iudge.qif" width="50" height="40"> </td> 
width="152" aiign="left" bgcolor="#D9E6FD" colspan= 2 



- <td width="152" a1ign="teft" bgcolor="#D9E6FD" colspan= 2 nowrap> 
<input type="file'* name="filel" size="15"><br> . , , . , 

<font face="verdana, Arial, Helvetica, sans-senf size= 1 >click the 
browse button to select your personal logo from your 
computer</font></font></td> 
</tr> 

^^''^td align="left" colSpan="2" nowrap height="5"></td> 
<td align="left" colspan="2" nowrap height="5"> 
</tr> 

^^<td width="200" align="left" bgcolor="cOD5FC" col span="4"><b><font 
face="verdana, Arial, Helvetica, sans-serif" size="2">MUSlC</font></b></td> 

^^<td^colspan="4" align="left" bgcolor="#D9E6FD"> 
<select name="music"> 

<option selected value="none">No Music 
<option value="music/antartica.mid">Antartica - VangeMs 
<option value="music/spring.mid">Spring - Vivaldi 
<option value="music/pinkpanther.mid">Pink Panther Theme 
</select> . ■ 

<font face="verdana, Arial, Helvetica, sans-serif size= 1 > 
select the tune you would like to send with your eYardSign</ront> 
</td> 

^^<td^align="center" bgcolor="#FFFFFF" colspan="4"><br> _ _^ 
<input type="submit" name="send" value=" Preview eYardsign > 
<input type=" reset" value="Clear Form" name="reset"> 
<input type="button" value="Back" name="button" 
oncl i ck="hi story . backO "> 
</td> 
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</tr> 

</table> <input TYPE="hidden" NAME="image" VALUE="<%=slmage%>"> 

</form> 

<!— #i Delude file="inc/bottotn_inc.inc" — > 
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<%© Language=VBScript %> 

<HTiviL> 

<HEAD> 

<title>About Us</title> 

<!-- #INCLUDE file="inc/top_inc.inc" — > 

<td>&nbsp ; &nbsp ; &nbsp ; </td><td cl ass="normal "> 

<!-- #INCLUDE file="inc/press.inc" --> 

<!-- #INCLUDE file="inc/bottom_inc.inc" --> 
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<%@ Language=VBScript %> 

<%if Request. QueryStringC'id") - "534250" then 

bweb = true%> . „ 

<!-- #include file='Mnc/rnc/yard_rncl.inc --> 
<% Response. write sBody 

eTse%> . „ 

<!— #inc1ude file="inc/database.inc :"><% 
sTrack_id = cstr(cdbl (Request .QueryStnngC id ))/2137) 
suser - cstrCcdbl (Request. QueryStringC'user"))/2448) 
set rs = server-CreateObjectC'ADODB. Recordset") 

sSQL = "SELECT " FROM Mai l^Tracki ng WHERE track„id = " + sTrack_id 
rs.Open sSQL,db 

sPosition = rs("position") 

simage = rs("design") 

sEmail = rs("return„emai1") 

sMessage = rs ("message") 

sFirst„Name = rs("First_Name") 

sLast_Name = rs("Last_Name") 

'ssubject = rs("subject") 

sLogo = rs("logo") 

sMusic = rs("music") 

sSiteURL = "http://www.eyardsigns.com/ 

'upper%> _ . „ 

<!— #include file="inc/top_mai1 .inc --> 
<%' start Yard Sign 
-Select case simage 
case 

<% case 



<!-- 


#include 


file=" 


inc/yardl. 


inc" 


— > 


"%> 






inc/yard2 . 






<! — 


#inc1ude 


file=" 


inc" 


— > 


"%> 






inc/yard3. 






<! — 


#include 


fi1e=" 


inc" 


— > 


"%> 






inc/yard4. 






<! — 


#inc1ude 


file=" 


inc" 


--> 


"%> 






inc/yard5 






<! — 


#include 


fi1e=" 


inc" 


--> 



<% case 

<% case 

<%end select 
'Lower%> 

<!__ #include file="inc/bottomL_mail .inc --> 

<%if not Request. QueryString("track") = "1" then call insertButtonsO else sBody 
= sBody + "</table>" 

Response. write sBody + sBodyl%> 

<!-- #include file="inc/lnsertButtons.inc" --> 
<%end ii^> 
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<%@ Language=VBScript %> 

<HTML> 
<HEAD> 

<ti t1 e>Pri ci ng</ti tl e> 

<!-- #INCLUDE file="inc/top_inc.inc" --> 

<td>   </td><tcl > 

<%if Request. FormC'submit") <> then 

for i = 1 to request. form. count - 1 „ „ 

sMailBody = sMailBody + Request. Form. Key (i) + : + 
Request- FormCi) + vbcrlf 

next , . 

set DMail = server. CreateOb3ectC"JMail .SMTPMail ) 

'This is my local SMTP server 

DMail .ServerAddress = "mailhub.registeredsite.com 
'This is me 

jMail. Sender = "customize@eyardsigns.com 
3Mail .subject = "Customize evardSigns" 

DMail .AddRecipient "sachin@ElectionMall .com" 

DMail.Body = sMailBody 
'Send it. . . 
DMail .Execute%> 

<BR><BR><BR><BR><p al i gn="center"> 
<font face="Arial" size="2">information 
Transmitted. . .</font><BR><BR> . , , 

<a href="default.asp">Continue. . .</a><BR></p> 

<%elSe%> ^ . -r-M n -1^5 An 

<p><FONT face="verdana, Arial, Helvetica, sans-serif color=#ele300 
size=2><B><F0NT color=#000000>ElectionMall .com strategically designs 
custom 'Sites for you to fit your company's image and needs. <B^^><B*^><A 
name=packages></A><BR>We offer comprehensive packages :<BR></FONT></B><F0NT 
faceAerdana, Arial, Helvetica, sans-serif" color=#000000 size=2>- Web 
consul ting</FONT><FONT col or=#000000></FONT><B>< FONT 
COlor=#000000><BR></FONT></B></FONT><FONT . 

face="ver^^^ Arial, Helvetica, sans-serif" color=#000000 size=2>. web auditing 

<BR>« web site blue prints <BR>« Continuous maintenance <BR>« web advertising 

and marketing <BR>- web engineering </font></p> ^ , 

<p align=justify><FONT face=" Verdana, Anal, Helvetica, sans-serif 

color=#ele300 size:=2><B><F0NT color=#000000><A 

name-benef i tsx/Ax/FONTx/Bx/FONTxFONT ^^nnnnn 

face="verdana, Arial, Helvetica, sans-serif col or=#000000 .^i..^.-^nc i-n 

size=2xBxBR>Benefits: <BRx/B>we are confident you will find our solutions to 
benefit your needs :<BRx/fontxFONT face="verdana, Arial, Helvetica, sans-serit 
color=#000000 size=2>. Less than 30-60 days till activation of your site <br>. 
Exceptional customer service <BR>* Additional supplementary hardvyare </FONTx/P> 
<p align=justifyxFONT face="Verdana, Arial, Helvetica, sans-serif 
color=#ele300 size=2><B><F0NT color=#000000><A 

name=pricing></A></FONTx/Bx/FONT><FONT ^^Annnn 

face="verdana, Arial, Helvetica, sans-serif color=#000000 
size=2xB><BR>Pricinq</B></F0NT><B>:</BxBR><F0NT ^ . 

facl="0erdana, ArialT Helvetica, sans-serif" co1or=#000000 sze=2>El ectionMa11.com 
customizes your services along with your price. Each proposal will be tailored 
to your direct internet needs. We will sit down with you on a one-to-one basis, 
to explain this industry so you feel comfortable with the internet, the 
technology, and the value you are getting, we firmly believe that if you are 
satisfied with our service, we will have a "partner" in business not for 
duration of any contract but for a lifetime. <BR><BR>Everyone wants the most 
mileage for their dollar! ® ElectionMall.com we understand and appreciate that, so, 
we 

belive in simplicity.</FONT></p> 

<FORM name=pricing action=pricing.asp method=post> #.i«3r>n 
<TABLE cellspacing=2 cellPadding=l width="96%" align=center bgColor=#ele300 
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border=0> 

<TBODY> 

<TR bgColor=#ffffff> 

<TD width="30%"><FONT face=verdana size=2><B><F0NT color=#000000>whats ts your 
name : </FONT></B></FONT></TD> 

<TD width=:"70%"><lNPUT maxLength=20 name=name> <SUP>-</SUP> </TD></TR> 
<TR bgColor=#ffffff> 

<TD width="30%"><FONT face=verdana size=2><B><F0NT color=:#000000>what is your 
budget :</FONT></B></FONT></TD> ^ ^ ^ , ^ ^ 

<TD width="70%"><SELECT name=currency> <0PTI0N value=US$ selected>$ US</0PTI0N> 
<0PTI0N value=Canadian$>$ Canadian</0PTI0N> <0PTI0N value=Rupees>lndian 
Rupees</0PTI0N> <0PTI0N val ue=Peso>Mexi can Peso</OPTiON></SELECT> <INPUT 
maxLength=20 name=money><SUP>*</sup> </td></tr> 

<TR bgCo1or=#ffffff> , , 

<TD width="30%"><FONT face=verdana size=2><B><F0NT color=#000000>what is your 
emai 1 : </font></b></font></td> . /™ /^n 

<TD width="70%"><lNPUT maxLength=30 size=:30 name=emailid><SUP>"-</SUP> </TD></TR> 
<TR bgColor=#ffffff> . ^ ^ . 

<TD width="100%" colSpan=2><F0NT face=Verdana color=#000000 size=2><B>What is 
your project :</B></F0NT><F0NT face=verdana color=#000000 si ze=2><BR><BR>P lease 
feel free to check more than one box:</FONT><BR> 

<table cellspacing=2 cenPadding=2 width="100%" bgColor=#cccccc border=0> 
<TB0DY> 

<TR vAl i gn=top> , , , . , u • ^ 

<TD><FONT face=verdana size=2><lNPUT type=checkbox checked value=website 

name=proiect> </FONT></TD> . . . , ,„ 

<TD><FONT face=Verdana color=#000000 size=2>web Site Desingning</FONT></TD> 

<TD><INPUT type=checkbox value=ENewsletter name=project> </TD> 

<TD><FONT face-verdana co1or=#000000 size=2>E-Newsletters</F0NT></TD></TR> 

<TR vAlign=top> , 

<TD><HMPUT^type=checkbox va1ue=Portal name=pro]ect> </TD> 

<TD><FONLface=Verdana color=#000000 si ze=2>Portal Si tes</FONT></TD> 

<TD><INPUT type^checkbox value=ECommerce name=project> </TD> 

<TD><FONT face=verdana color=#000000 size=2>E-Commerce</FONT></TD></TR> 

<TR vAlign=top> . , . , 

<TD><INPUT type=checkbox value=Bunetienboard name=pro]ect> </TD> . 

<TD><FONT face-verdana color=#000000 size=2>interactive Forums & Bulletien 

Boa r d S </ FONT></TD> 

<TD><INPUT type=checkbox value=EFaxing name=pro3ect> </TD> 

<TD><FONT face=verdana color=#000000 size=2>E-Faxing</F0NT></TD></TR> 

<TR vAlign=top> 

<TD><INPUT type=checkbox value=Chat name=pro]ect> </TD> 
<TD><FONT face=verdana color=#000000 size=2>chat </FONT></TD> 
<TD><INPUT type=checkbox value=EMail name=project> </TD> 
<TD><FONT face=verdana color=#000000 size=:2>E-Mail Managing software 

</ FONT></TD></TR> 

<TR vAlign=top> 

<TD><INPUT type^checkbox value=Dava name=pro3ect> </TD> 
<TD><FONT face=verdana color=#000000 size=2>Customi sed Java 
Appl i cati ons</FONT></TD> 

<TD><INPUT type=checkbox va1ue=OnlineCatalog name=pro3ect> </TD> 
<TD><FONT face=verdana color=#000000 size=2>0nline Catalog</FONT></TD></TR> 
<TR vAlign=top> . . 

<TD><INPUT type=checkbox value=Flash name=proiect> </TD> 
<TD><FONT face=verdana co1or=#000000 size=2>Flash Techno! ogy</FONT></TD> 
<TD><INPUT type=checkbox value=SearchEngine name=project> </TD> 
<TD><FONT face=verdana co1or=#000000 size=2>search Engine</FONT></TD></TR> 
<TR vAlign=top> . . 

<TD><INPUT type=checkbox va1ue=Graphics name=pro]ect> </TD> 
<TD><FONT face=verdana color=#000000 size=2>Animation & Custom-made 
Graphics</FONT></TD> , . . ^ 

<TD><INPUT type=checkbox value=TrafficAnalysis name=project> </TD> 
<TD><FONT face=verdana color=#000000 size=2>Traffic 
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Analysi s</font></td></tr> 
<TR vAlign=top> 

<TD><INPUT type=checkbox value=fundraising name=project> </TD> 

<TD><FONT face=verdana color=#000000 size=2>0nline Fundraising</FONT></TD> 

<TD><INPUT type=checkbox value=BannerAds name=project> </TD> 

<TD><FONT face=:Verdana color=#000000 size=2>Banner Ads</FONT></TD></TR> 

</TBODY></TABLE><BR><FONT face=verdana color=#000000 

size=2>Describe your project<BR><TEXTAREA name=description rows=8 

col S=50></TEXTAREA> 

</ FONT></TD></TR> 

<TR align=middle bgColor=#ffffff> 

<TD width="100%" col5pan=2><INPUT type=hidden value=info@ElectionMan .com 
name=email> <INPUT type=hidden value=usa name=country> 

<INPUT type=submit value=Submit name=Submit> <INPUT type=reset value=Reset 

name=Submit2> 

</td></t rx/tabl e> 

</form> 

<%end if%> 

<!-- #INCLUDE file="inc/bottom_inc.inc" 
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<%© Language=VBScript %> 
<html> 

<head> „ , „ 

<meta http-equiv="Pragma" content^ no-cache > ^ „ 

<meta http-equiv="ExpTres" content="Tue, 01 3an 1980 1:00:00 GMT"> 
<title>eYarclsi gns.com | Sign Up Now! It's Fast and Free</title> 
<script language="DavaScript"> 
function checkFormC) { 

errorFields = „, 

if CtrimCdocument. SIGNUP. UserName. value) == ) { 

errorFields += Enter a user name for this account. \n ; 

if CCtrimCdocument. SIGNUP. password. value) J I 

Cdocument. SIGNUP. password. value.indexOtC ) ^ ""^^ 
Cdocument. SIGNUP. password. value. length < 4)) { 

errorFields += "- Enter a password from 4 to 10 
characters long with no spaces. \n"; 

if Cdocument. SIGNUP. password. value != 

document. SIGNUP. retype_password. value) { ^ ^ a-a ^^^r^u 

errorFields += The two passwords you entered did not match. 

Please re-enter your password. \n"; 
} 

if CtrimCdocument.SlGNUP.fi rst_name. value) == "") { 

errorFields += Enter a First Name for this account. \n ; 
} 

if CtrimCdocument. SIGNUP. last_name. value) "") { 

errorFields += Enter a Last Name for this account. \n , 

- ^ } 

if (!isEmailvalid(document. SIGNUP. email .value)) { . 

errorFields += "- Enter a valid email address in the form 

xxxOxxx.xxx.Xn" ; 

} 

if CtrimCdocument. SIGNUP. age. value) == "") { 
errorFields += "- Enter your Age.\n ; 
} 

if CtrimCdocument. SIGNUP. Addressl. value) == "")_,{ 
errorFields += "- Enter your Address. \n ; 

} 

if CtrimCdocument. SIGNUP. City. value) =='"') { 
errorFields += "- Enter City.\n ; 
} 

if Cdocument. SIGNUP. State. selectedlndex == 0) { 
errorFields += "- Select State. \n ; 
} 

if CtrimCdocument. SIGNUP. Zipcode. value) ==,"") { 
errorFields += "- Enter zipcode. \n ; 

} 

if Cdocument. SIGNUP. Party_Affiliati on. selectedlndex == 0) { 
errorFields += "- Select Party Affiliation.\n ; 

} 

if C! document. SIGNUP. agree. checked) { 
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errorFfelds += Please review and accept the terms of service. \n" 
} 

if (errorFields != { 

errorFields = "Please correct the following errors, then resubmit 
the form. Thank you.\n\n" + errorFields; 

alert (errorFields) ; 

return false; 

} 

else { 

return true; 
} 

} 

</script> 

<script language^" Javascript" src="src/utils. js"></script> 
<!-- #include file="inc/top„inc.inc" --> 
<!-- ^include file="inc/database.inc" --> 
<td> 
<%'Code Start 

set rs = server. CreateObjectC'ADODB. Recordset") 

'Get States 

rs.Open "Select * from state", db 
do until rs.EGF 

sState_List = sState„List + "<option value=" + cstrCrs(O)) + ">" + 
rs(l) + "</opti on>" 

rs.MoveNext 

loop 

'Get Party 
■ ■ ^rs-. close 

1*5. open "Select pa rty„id, party from Party", db 
do until rs.EGF 

sParty.List = sParty^List + "<option value=" + cstrCrs(O)) + + 
rs(l) + "</option>" 

rs.MoveNext 

loop 

if not Session("user") = "" then 

sSQL = "SELECT * FROM user_info where U5er_id = " + Session ("user") 
rs-close 
rs.Open sSQL,db 
if not rs.EGF then 

suserName = trimCrs("username")) 

sPassword = trimCrs("password")) 

sFirst^Name = trim(rs("Fi rst_Name")) 

sLast_Name = trimCrsC"Last„Name")) 

sAge = trim(rs("Age")) 

ssex = trim(rs("Sex")) 

sEmail = trim(rs("email")) 

sAddressl = trim(rs("addressl")) 

sAddress2 = trim(rs("address2")) 

scity = trimCrs("city")) 

sstate = trim(rs("state„id")) 

szipcode = trimCrs("zip_code")) 

sphone = trimCrs("phone")) 

sURL = trimCrsC"url")) 

sParty_Affiliation = trim(rs("party_id")) 

sstate_List = replace(sState_List , "=" + sstate,"=" + sState 

+ " selected") 

sParty_List = 
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replace(sParty_List,sParty_Affiliation,sParty_Affniation + " selected") 
end if 

end if 

rs, Close : set rs = nothing 
db. close : set db = nothing 

%> 

<fom name=*'SIGNUP" action="confirm.asp" method="post" 
onsubmi t=" return checkFormQ "> 

<table width="98%" border-"0" align-"center" censpacing="2" 
cellpadding-'Z" bgcolor="#FFFFFF"> 

<tr> <td colspan="2" bgcolor="cOD5FC"><font face="verdana, 
Arial, Helvetica, sans-serif" size="4"><b> 

<img src="grfx/eyard„button2.gif" WIDTH="21" 
HElGHT="13">Membership lnformation</td></tr> 
<tr> 

<td width="200" bgColor="#D9E6FD"><font face="verdana, Arial, Helvetica 
sans-serif" size="2"><b> user 

Name</font></b></font></td> 
<td width="380" bgcolor="#D9E6FD"> 

<font face="verdana, Arial, Helvetica, sans-serif" 

size="2"> 

<%if suserName = "" then%> 

<input name="UserName"> 
<%el5e 

Response.wri te suserName 

Response.wri te "<input name='UserName* value='" + 

suserName + "' type='hidden'>" 

end if%> 

</td> 
</tr> 
• ' -<tr> 

— <td width="200" bgColor="#D9E6FD"><font face="verdana, Arial, Helvetica 
sans-serif" size="2"><b> 

Password</b><font size="l"> (4 - 10 characters)</font></font></td> 
<td width="380" bgcolor-"#D9E6FD"> 

<input type="password" name="password" value="<%=sPassword%>"> 
</td> 
</tr> 
<tr> 

<td width="200" bgColor="#D9E6FD"><font face="Verdana, Arial, Helvetica 
sans-serif" size="2"><b> Retype 

Password</font></b></font></td> 
<td width="380" bgcolor="#D9E6FD"> 

<input type="password" name="retype_password" value="<%=sPa5Sword%>"> 
</td> 
</tr> 

^ "^^td colspan-"2" height="5"> </td> 
</tr> 
<tr> 

<td colspan="2" bgcolor="#cOD5FC"><font face="verdana, Arial, 
Helvetica, sans-serif" size="5"><b><font size="+l"><img src="grfx/eyard„button2.gif 
width-"2r' height="13"></font></b></font> 

<font face="verdana, Arial, Helvetica, sans-serif" 
si ze="+l"><b>Personal 

inf ormati on</b></f ont></td> 
</tr> 

<tr> 

<td width="200" bgColor="#D9E6FD"><font face="verdana, Arial, Helvetica 
sans-serif" size="2"><b> First 

Name<f ont col or=" red">"</f ontx/f ontx/bx/f ont></td> 
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<td width="380" bgcolor="#D9E6FD"> , 

<input name="f i rst_name" value= <%=sFi rst_Natne%> > 
</td> 
</tr> 

^^<td bgColor="#D9E6FD" width="200"><font face='"verdana, Arial, Helvetica, 

sans-serif" size=''2"><b> Last ,u ^ /^a 

Name<font color="red">*</font></font></b></font></td> 

<td width="380" bgcolor="#D9E6FD"> 

<input name="1ast_name" value="<%=sLast_Name%> > 
</td> 
</tr> 

^^<td bgCo1or="#D9E6FD" width="200"><font face="verdana, Arial, Helvetica, 
sans-serif" size= 2"><b> Age<font color="red">*</font></font></b></font></td> 
<td bgco1or="#D9E6FD" width="380"> 

<input naine="age" value="<%=sAge%>"> 
</td> 
</tr> 

^^<td bgCo1or="#D9E6FD" width="200"><font face="verdana, Arial, Helvetica, 
sans-serif" size=^2"><b> Sex<font color="red">*</font></b></font></td> . 
sans senr bgcolor="#D9E6FD" width="380"> <font face=" Verdana, Anal, 

Helvetica, '^^^'^^^:>,. name="Sex" value="Male" checked> 

<b>Mal e&nbsp ; „ „ . ,. ^ „ 

<input type=" radio" natne="sex" value=" Female > 
Female </b></font></td> 
</tr> 

^^<td bgColor="#D9E6FD" width="200"><font face="Verdana, Arial, Helvetica, 

sans-serif" size= 2"><b> Email Address<font 
co1or="red">*</font></font></b></font></td> 

<td bgcolor="#D9E6FD" width= 380 > .^^ ,. „ ^ 

<input name="email" value="<%=sEmail%>' >&nbsp ;<a , 
h ref =" j avasc r i pt : po rtwi n ( ' whyemai 1 . htm ' , 600 , 3 20) "><i mg s r c= g rf x/hel p . gi f 
border="0" WIDTH="22" HElGHT="22"></a> 
</td> 
</tr> 

^^<td bgColor="#D9E6FD" width="200"><font face="verdana, Arial, Helvetica, 

sans-serif" size= 2"><b> Street Address „ ,^ ^ /*.a 

sans serii ^.^^ i<font color="red">*</font></font></b></font></td> 

<td bgcolor="#D9E6FD" width="380"> 

<input name="Addressr' value="<%=sAddressl%> > 
</td> 
</tr> 

^^<td bQColor="#D9E6FD" width="200"><font face="Verdana, Arial, Helvetica, 
sans-serif" size= 2"><b> Street Address 

Li ne 2</f ontx/bx/f ont></td> 



<td bgcolor="#D9E6FD" width="380"> 

<input name="Address2" value="<%=sAddress2%> > 



</td> 
</tr> 

^^<td bgColor="#D9E6FD" width="200"><font face="verdana, Arial, Helvetica, 
sans-serif" size=^2"><b> City<font col or="red">*</font></f ontx/bx/f ont></td> 
<td bgcolor="#D9E6FD" width="380"> 

<input name="City" value="<%=scity%> > 
</td> 
</tr> 
<tr> 
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<tcl bqColor="#D9E6FD" width="200"><font face="verdana, Arial, Helvetica, 
sans-serif" size="2"><b> State/Province<font 
color="red">*</font></font></b></font></td> 

<td bqcolor="#D9E6FD" width="380"> 

<select name="State"> ^ ^ . , ^. 

<option value="0">-select from List-</option> 

<%=sState_Li st%> 
</se1ect> 

</td> 
</tr> 

^*<td bqColor="#D9E6FD" width="200"><font face="Verdana, Arial, Helvetica, 
sans-serif" size= 2"><b> Zip/Postal Code<font 
color="red">*</font></font></b></font></td> 

<td bgcolor="#D9E6FD" width="380"> 

<input name="Zipcode" val ue="<%=szi pcode%> > 
</td> 
</tr> 

^^<td bgColor="#D9E6FD" width="200"><font face="verdana, Arial, Helvetica, 
sans-serif" size= 2"><b> Phone 

Numbe r</f ontx/bx/f on t></td> 



<td bgcolor="#D9E6FD" width="380"> 
<input nattie=" Phone" value="<%=sPhone%>"> 



</td> 
</tr> 

^^<td bqColor="#D9E6FD" width="200"><font face="Verdana, Arial, Helvetica, 
sans-serif" size= 2"><b> Your website</b> 

<font size="r'>(for example 
http://www.youraddress.com)</font></font></td> 
- --'^ ' <td bqcolor="#D9E6FD" width="380" VALlGN="bottom"> 

- <input name="URL" value="<%=sURL%>"> <a , u„„^^, .-n- 

href="javascript:portWinCwhyurl.htm',600,320)"><img src="grfx/help.gif border= 0 
WIDTH= 22" HEIGHT="22"></a> 
</td> 

^^<td bgColor="#D9E6FD" width="200"><font face="verdana, Arial, Helvetica, 
sans-serif" s"' Jf^^'^>^5on<fSt col or="red">*</font></f ontx/bx/f ont></td> 
<td bgcolor="#D9E6FD" width="380"> 
<select name="Party^ffiliation"> 
<option value="0">-select from List-</option> 
<%=sParty_List%> 

</select> 
</td> 
</tr> 

^^<td bgColor="#D9E6FD" width="200"><font face="verdana, Arial, Helvetica, 

sans-serif" size=^2"xb>would o /u z^: ^ /^a 

you like to receive our Newsl etter?</bx/font></td> 
<td bgcolor="#D9E6FD" width="380"> <font face="Verdana, Anal, 
Helvetica, sans-serif"> 

<font size="2"> <b> „ ^ „^„ u r j 

<input type=" radio" name="Newsletter" value= 1 checked> 
Yes 

<input type=" radio" name="Newsletter" value="0"> 
NO </b></font></fontx/td> 
</tr> 

^*<td bqColor="#D9E6FD" colspan="2"xfont face=" Verdana, Arial, Helvetica, 

sans-serif" size= 2"> 

<input type="checkbox" name="agree"xb>i agree to the <a 
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href="termsofservice,asp" target="_blank''> 

Terms of service</b></font></td> 

<tr>itd colspan="2"><font face="verdana, Arial, Helvetica, sans-serif" 

size= 2 ><^>^^^ color="red">*</font> Required information</font></td></tr> 
<tr align="center"> 

^^<input^id="submitl" name="submitl" type="submit" value="submit"> 
<%if not sessionC'user") = ;'" then%> , 
<input name="resetl" type="button" value= Cancel 
oncl i ck="hi story . backO"> 
<%end if%> 
</td> 
</tr> 
</tab1e> 

<input TYPE="HIDDEN" NAME="REF 

VALUE="<%=Request. Que ryStringC'.'ref ")%>"> 

<input TYPE= ''hidden" NAME="pa" > 

</form> 

<%'Code End%> 
<i— #inc1ude fi1e="inc/bottom_inc.inc" --> 
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<%@ Language=VBScript %> 

<html> 

<head> 

<title>Remove form List</title> 

<!-- #include filG="inc/top_inc.inc" --> 

<!-- #include file="inc/database.inc" --> ^ , 

<td align^'^center" c1ass= normal ><%* Code start 
if Request. Form("email") = then%> 

<b><BR>Type your e-mail address in the box below and 



click 'Remove' to 
receive no future e-mails 
removal from system. 

name="forml"> 



remove yourself from the eYardsigns.com List and 
from us. Please ALLOW at least 72 hours for proper 
</b> 

<form action="remove__email .asp" method="post" 



<input type="hidden" 

value="<%=cdbl (Request. QueryStringC''id"))/2448%>"name="use^^^^ , ^ „ , .„ 

<input name="email" size="30"> <input type=' submit 

value="Remove" id="submitl" name="submi tr'> 

</form> 

set rs = server. createobjectC'ADODB. Recordset") 

suser = Request. FormC'user") 

sSQL = "Select b.list„name FROM email a, list b 

WHERE a.user_id = " + sUser + _ ,„ ^„ -nn^ m ^^r^ 

" AND a. email = '" + Request . Form("email ) + AND 



a.list_id = b.list_id" 



" + suser + _ 

user„id = " + sUser 
rs ("Last^Name") 



rs.Open sSQL,db 

if not rs.EOF then 

sList = rs.GetStringC, ",",","," ") 
sList = left(sList,len(sList)-l) 

sSQL = "Delete * FROM email WHERE user_id == 

" AND email = '" + Request . Form("email") + 

db. Execute sSQL 

SSQL = "Select " from user_info where 

rs. close 
rs.Open sSQL,db 

sName = trim(rsC"Fi rst_Name")) + " + 



sEmail = rs ("email") 
rs. close : set rs = nothing 
db. Close : set db = nothing 

'Send the user a mail 

sBody = sBody + formatdatetime(Date,l) + 

ch r (13) 

sBody = sBody + "Attention " + sName + ":" + 

chr(13) + chr(13) 

sBody = sBody + "The following recipient '" 
+ Request. Form("email") + has requested to be officially " + - . 

"removed from your Email Lists. The 

recipient has been removed from the following " + _ , ^^^^ , 

"list(s) : " + sList + chr(13) + chr(13) 
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on your Campaign!" + chr(13) + chrC13) 
chr(13) + chrC13) 

Server . CreateObject ("3Mai 1 . SMTPMai 1 ") 
"mai 1 hub . regi steredsi te . com" 

list" 



remove_emai 1 .asp 

sBody = sBody + "Thank you and best wishes 



sBody = SBody + "Customer Service" + chr(13) 
SBody = sBody + "www.ElecionMall.com" + 

set J Mail = 

'This is my local SMTP server 
JMail .serverAddress = 

'This is me. - . . 

JMail. Sender = "emailremoval@eyardsigns.com" 
JMail .Subject = "Request for removal from 

DMail .AddRecipient sEmail 



DMail .Body = sBody 
JMail .Priority = 3 
'Send it. . . 
JMail .Execute 

end if 

Response.wri te "<BR><BR><BR><BR><BR><b>Your email 
address has been removed from our servers. </b><BR><BR><BR>" 

end if 

'code end%> 

<BR><BR><BR><BR><BR> 
<!-- #include file="inc/bottom_inc.inc" 
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<HTML> 
<HEAD> 

<TITLE>Custom Yardsign</TITLE> 

</HEAD> 

<BODY> 

<form name="frm.yardsign" method="post" , 
acti on="http : //www . eyardsi gns . com/custom_yardsi gn . asp > 
<tab1e><tr><td> / ^ 

<p><font face="verdana, Arial" size="2%Name</font></td> 
<td><lNPUT name=saname></td></tr> 

<tr><td><font face="verdana, Arial" size="2">Email </font> </td> 

<td><INPUT name=saemail></td></tr> „ , . „ u u -^-i" /^^ /-h..^ 

<tr><td colspan-'2'><input type="subrm t" va1ue="Subimt" name= subrmtl ></td></tr> 

</table> 

<input name="saref' • type="hidden" value="http://www. rnc.org > 

<input name="sa5ubject" type="hidden'; value="vote for us > 

<input name="sasGnder_email" type="hidden" value="yardsign@rnc.org > 

</form> 

</BODY> 

</HTML> 
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<%@ Language=VBScript %> 

<html> 

<head> 

<title>select ListCs)</title> „ , . / • ^ 

<script Language="DavaScript" src="src/AddRemove.3S ></scnpt> 
<script language^" Javascript" src="src/utils. js"></scnpt> 
<!__ #include file="inc/session_timeout .inc" --> 
<!— #include file="inc/top_inc.inc" --> 

<!— #include file="inc/database.inc" — > . ^ ^ ^ 

<td align="center" va1ign="top"><%'Code start 
set rsl = server. createObjectC'ADODB. Recordset") 
set rs2 = Server .createObjectC"ADODB. Recordset") 

sSQL = "select a.1ist„id,a.list_name from list AS a, 

user list.link AS b where " + „ ^, n ^ • /u ..^ 

"a.list_id = b.list_id AND (b.user_id = + SessionC"user ) 

+ " OR b.user_id = 1) order by a.list_name" 

rsl. open sSQL,db 

do until rsl. EOF _ " 

SSQL = "SELECT COUNTC") FROM email WHERE user_id = 
+ session("user") + " and list„id - " + cstr(rsl(0)) 

rsZ.Open sSQL,db 

sNumber = " C" + cstr(rs2C0)) + ")" 

sList = sList + "<0PTI0N value=*" + cstrCrsKO) + 
"-" + rsl(l) + "'>" + rslCD + sNumber + "</OPTlON>" 

rsl.MoveNext 

loop 



m 'clean Up 

i ' : ^ rsl. Close : set rsl = nothing 

^ set rsZ = nothing 

^0 db. close : set db = nothing%> 

. <! Start Form 3 

> 

H <form action="sendyardsign.asp" method="post" 

^1 name="frm^ddtolist" onsubmit="return CheckForm^ddtolistQ ; "> 

P <table border="0" cell Paddn ng=:"l" cellSpac-ing= 1 

Li width="98%" align="center"> 

O Jtd^align="left" bgColor="#cOd5fc" > ^ . „ 

H <font face="verdana, Arial, Helvetica, sans-serif size= 4 

^^^^ STEP 3 : select Target List(s)</b></font></td></tr> 

<tr><td bgcolor="#D9E6FD" > „ „ . 

<table border="0" cell Padding="l" cellspacing^ 1 

width="50%"> 

<td xfont face="verdana, Anal, Helvetica, 
sans-serif" size="2" ><B>Your Lists</td><td> </td> 

<td colspan="2" xfont face= Verdana, Anal, 
Helvetica, sans-serif" size="2" ><B>Recipients</td> 

<tr> 

<td width-"25%"><select id="selectl" name="selectl" 

size="6"> 

<%=SL1 St%> 

</select></td> 

<td width="12%"><input name="btn„add" 
oncl i ck=" javascri pt : AddRemove(O) " type="button" val ue="&gt ;&gt ; "> 

<br><input name="btn„remove 
oncl i ck=" j avascri pt : AddRemove (1) " type=" button " val ue="&l t ; &1 1 ; "> 

</td> 
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<td width="25%"><select multiple name="selectl 

size="6" width="120"></select> </td> . „ , . ,„ . 

<td width="25% xinput name="submitl" type= submit 
val ue="Send" oncl i ck='"document . f rm_Addtol i st . stype . val ue= ' 0 ' "> 

</td></tr></tabl e> 

<! End Form 2 

> 

<font face="verdana, Arial, Helvetica, sans-serif" size="l" 

^ choose list(s) from above by clicking "»" 

</font> 
</td></tr> 

<tr><td bgcolor="#c0d5fc"> 

<font face="verdana, Arial, Helvetica, sans-senf 

size="4" ><B>OR</B></font> 

</td></tr> 

<tr><td bqcolor="#D9E6FD"> ^ . . .„ 

<font face="verdana, Arial, Helvetica, sans-senf 

^ Enter ONE email Address </font>  <input 

name="one_email">   <input name="submit2" type="submit" 

val ue="send" oncl i ck="document . f rm_Addtol i st . stype . val ue= * 1" "> 

</td></tr> 

</table> „ .,, 

<p align="center"><input type="button" name= buttonl 
value="Change eYardsign" oncl ick="javascript: hi story. go(-2)"></p> „ 

<input name="ecard" val ue="<%=Request.Form("i mage )%> 

type="hidden"> ^.^^^^ name="email" value="<%=Request.FormC'emaiT')%>" 

type="hidden"> 

— <input name="s Position" 

value="<%=Request.Form("sPosition")%>" type="hidden;; > ^...-r.-^-i^.-v/^- 

<input name="sTitle" value="<%=Request.Form( sTitle )%> 

type= hidden > <input name="slmage" value="<%=Request. FormC"slmage")%>" 

type="hidden > <input name="sEmail" value="<%=Request. Form("sEmail")%>" 

type= hidden > <input name="sMessage" value="<%=Request.Form("sMessage")%> 

type="hidden" > <input name="sFname" value="<%=Request. FormC"sFname")%>" 

type= hidden > <input name="sLname" value="<%=Request. Form("sLname")%>" 

type= hidden > <input name="sSubject" value="<%=Request. Form("sSubject")%> 

type= hidden > <input name="sMusic" value="<%=Request.FormC"sMusic")%>" 

type="hidden" > ^.^^^^ name="sSiteURL" value="<%=Request. Form("sSiteURL")%> 

type= hidden > <input name="sLogo" value="<%=Request.Form("sLogo")%>" 

<input name="stype" type="hidden"> 
</form> 

<%'code end%> . . „ 

<!— #include file="inc/bottom_inc.inc --> 



type="hidden"> 
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<%@ Language=VBScript %> 

<%Response. Buffer = true 

Response . Expi res=0 
Response. Clear%> 
<htm1> 
<head> 

<title>Preview eYarclSign</tit1e> 

<!-- #include file=:"inc/session_timeout .inc" --> 

<!-- #include file="inc/top_inc.inc'' 

<td width-"98%" align="center"> 

<% 

suser„id = Session("user") 

sFileName = sUser_id + "_implogo.img" 

filename = "upload\" + sFileName 

'Create and write to a File 
sserverfilename = sScriptDir 

set upl = Server. CreateobjectC'softArti sans. Fileup ; 
if upl .formC"filel").lsEmpty then 
sLogo = upl .Form("s_logo") 

else 

SScriptDir = , ..^n^ 

StrReverseCserver.mappathCRequest.ServerVariablesC PATH_INFO ))) 

SScriptDir = Mid(sScriptDi r , lnstr(l, sScnptDir, \ )) 
SScriptDir = StrReverse(sScriptDi r) + filename 
upl.SaveAs SScriptDir 
sLogo = filename ^ 

end if 

. sPosition = replace_.apost(upl .Form("s_position")) 
' sTitle = replace_apostCupl .FormC"s__title")) 

'^'slmaqe = upl . FormC'image") 
sEmail = upl .FormCs_email") ^ . ^^^^ „ „^ 

SMessage - replace(replace_apost(upl . ForrnC"message )),chr(10), <BR> ) 
'sMessage = replace(sMessage, " "," ") 

sFirst„Name = upl . FormC"s_f name") 
sLast_Name = upl .Form("s_l name") 
ssubject = replace_apostCupl .FormC"subject )) 
sMusic = upl .Form("music") 

sSiteURL = "http://www.eyardsigns.com/" 
'Upper%> 

<!-- #include file="inc/top_mail .inc --> 



<%' start Yard Sign 


Select 


case simage 
case "!"%> 
<!-- 


<% 


case "2"%> 

<!-- 


<% 


case "3"%> 

<!-- 


<% 


case "4"%> 
<! — 


<% 


case "5"%> 

<!-- 


<%end 


select 


Lower%> 





#include file="i 



nc/yardl.inc 
nc/yard2.inc 
nc/yard3.inc 
nc/yard4-inc 



--> 



— > 
--> 
--> 

--> 
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<% call insertButtonsQ 

sBodyl = midCsBodyl,13,lenCsBodyl)-27) 
Response. Write sBody + sBodyl%> , , „ 

<form name="formr action="selectlist .asp" method= post > 
<table align="center" xtrxtd align="center 
width="150"> </td><td> ^ . „ 

<input name-"buttonl" value=:"Change eYardSign type= button 

°"^"^'="^^"^^^lSj5U?Si'S'E"sub»,itl" value="send evardsign" typ.;"subn,1t" > 

 <input name-"buttonl" value= '^'Cancel" type="button 
oncl i ck=" j avascri pt : document . 1 ocati on= ' def aul t . asp ' "> 
</t rx/tdx/tabl e> 



nput name="sPosition" value="<%=sPosmon%>" type= hidden > 
nput name="sTitle" value="<%=sTitle%>" type="hidden > 
nput name="simage" value="<%=simage%>" type= hidden > 
nput name="sEmail" value="<%=sEmail%>" type="hidden > 
nput name="sMessage" value="<%=sMessage%>" type= hidden > 
nput nafne="sFname" value="<%=sFi rst_Name%>" type= hidden > 
nput name="sLname" value="<%=sLast_Name%> type= hidden > 
nput name="ssubject" va1ue="<%=ssubject%>" type= hidden >. 
nput name="sMusic" va1ue="<%=sMusic%>" type="hidden > 
^■nput name="sSiteURL" value="<%=sSiteURL%>" type=' hidden > 
<input name="sLogo" value="<%=sLogo%>" type=' hidden > 



<i 
<i 
<i 
<i 
<i 
<i 
<i 
<i 
<i 
<i 



</form> 

<!__ #inc1ude file="inc/bottom_inc.inc --> 

<% 

function insertButtonsO -,■ , ^ . 

sBody = sBody + "<TR><td col5pan='7' align= center ><bR> 

sBody = sBody + "<TABLE borer='0' censpacing='0' cenpadding= 0 

'^l^^;'^=!J°^^J<I'^^gojjy ^ ..^-TD colspan='5' a1ign='center'><font face='verdana, AriaT 
size- 2 ^B>^ ^ ^g^jy ^ "Please show your support by clicking on following 

lCOns<BR><BR></B></font></TD></TR><TR>" 
* HeadQuarters 

sBody = sBody + ■'<TD width='20%' align='center'>" 
sBody = sBody + "<img src="' + sSiteURL + "grfx/hdq.gif border= 0 
alt=' Headquarters '><BR>" . , . ,, 

sBody = sBody + "<font face=' Verdana, Anal 
si ze= ' 1' >Headquarters</f ont></TD>" 

'Donate . , . , , „ 

sBody = sBody + "<TD width='20%' align=' center > . . 

sBody = sBody_+ "<img src="' + sSiteURL + "grfx/donate.gif border= 0 

alt=' Donate •><BR>^^^^ + "<font face=' Verdana, AriaV size='l'>Donate</font></TD>" 

'volunteer . , , „ 

sBody = sBody + "<TD width='20%' al ign=' center > 
sBody = sBody + ;;<img src="' + sSiteURL + "grfx/volunteer.gif border= 0 

alt='volunteer^><BR>^ + "<font face='verdana, Arial' size='l'>Volunteer</font></TD> 
'Send to Freind 

sBody = sBody + "<TD width='20%' align=' center > ^ . ^ ^ . 

SBody = sBody + "<img src="' + sSiteURL + "grfx/sendtoaf nend.gif border= 0 
alt='Send to a Friend'><BR>" . ^, . ^ . ^ 

sBody = sBody + "<font face=' Verdana, Anal' size='l >Send to 
Fri end</font></TD>" 

'Vote 

sBody = sBody + "<TD width='20%' align='center'>" 
sBody = sBody + "<img src="' + sSiteURL + "grfx/vote.gif ' border= 0 

alt='vote^><BR>"^^^^^ + ■•<font face=' Verdana, Arial' size='l'>Vote</font></TD>" 
sBody = SBody + "</TR></TABLE></TD></TR></TABLE>" 
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end function%> 

<!— #include fi1e="SCRlPTS/replace_apost.code" — > 
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<%@ Language=VBScript %> 

<html> 

<head> 

<title>Send to a Freind</title> 
<script language="JavaScript"> 
function checkFormC) { 
errorFields = 

if (trimCdocument. SIGNUP. name, value) == { 
errorFields += Enter your name.\n"; 
} 

if (!isEmailValid(document. SIGNUP. email .value)) { 

errorFields += Enter a valid email address in the form 
xxxSxxx . XXX . \n\n" ; 

} 

if (trimCdocument. SIGNUP. emails. value) == "") { 

errorFields += Enter email addresses you want the eYardsign 
forwarded to.\n"; 

} 

//check other email addresses 

sEmails = StringCdocument. SIGNUP. emails. value) 

sEmail^split = sEmails.splitC" , ") 

f or Ci =0 ; i <sEmai l_spl i t . 1 ength ; i ++) { 

if (!isEmailValid(sEmail_split[i])) { 

errorFields += "- Error encountered in email address number 
" + StringCi+1) + " mispelled as " + sEmail„split[i] + "\n"; 

} ^ 

- - "if- (errorFields != "") { 

errorFields = "Please correct the following errors, then resubmit 
the form. Thank youAn\n" + errorFields; 

alert(errorFields) ; 

return false; 

} 

else { 

return true; 

} 

} 

</scri pt> 

<script language=" Javascript" src="src/utils. js"></script> 
</head><body bgcolor="092186"> 

<table width='"600" border="0" cellspacing-"0" cenpadding="0" align="center"> 

^^<td width="17" al ign=" right "ximg src="grfx/pop_cornerl.gif" width="20" 
height="20"></td> 

<td bgcolor="C0D5FC" width="74"> </td> 
<td bgcolor="C0D5FC" width="486"> </td> 

<td width="18" align="left"><img src="grfx/pop„corner2 .gif " width="20" 
height="20"></td> 
</tr> 
<tr> 

<td width="20" bgcolor="C0D5FC"> </td> 
<td width=:"74" bgcolor="COD5FC"> 

<a href="http://www.eyardsigns.com"><img src="grfx/eyard_imgl,gif" border="0" 
width='70"></a> 
</td> 

<td width="486" bgcolor="C0D5FC" align="center"> 

<%Set ad = 

server, CreateObjectC'MSWC.AdRotator") %> 

<%= ad . GetAdverti sement ("i nc/adrot_l ng . txt") 
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%> 

</td> 

<td width="20" bgcolor="COD5FC"> </td> 
</tr> 

^^<td width="20" height="3" bgco1or="C0D5FC"><img src="grfx/b1uespacer.gif " 
idth="l" height="l"></td> . „ ^ 

<td width="74" height="3" bgcolor="COD5FC"><img src="grfx/bl uespacer.gif 
idth="l" height="l"></td> . ^ 

<td width="486" height="3" bgcolor="COD5FC"><img src= grfx/bl uespacer.gif 
idth="r height="l"></td> „ ^ „^ 

<td width="20" height="3" bgcolor="COD5FC"><img src="grfx/bluespacer.gif 
dth="l" height="r></td> 
</tr> 

<td width="20" bgcolor="COD5FC"> </td> 

<td width="74"><itng src="qrfx/l ogo_half.gif" width="74" height="20 ></td> 
<td width="486"><img src=^grfx/l ogo_ha1f2.gif" width="60" height="20 ></td> 
<td width="20"> </td> 
</tr> 

<td width="20" bgco1or="COD5FC"> </td> 

<td colspan="2" bgco1or="COD5FC" height="371" valTgn="top" align= center > 
<%if Request. FormC'emai Is") = "" then%> 

<!— #include file="inc/convert_trackid.inc — > 

<!— #include file="inc/database.inc" — > 

<%set rs = server. createObjectC'ADODB. Recordset ) 

sSQL = "select First_Name, Last_Name from Mail_Tracking WHERE track_id = " + 
sTrack_id 

rs.open sSQL.db 
- ■ --^sHame = rs(0) '+ " " + rs(l) 

rs. Close : set rs = nothing 

db. Close : set db = nothing 

%> 

<form name="SlGNUP" action="sendtof riend_form.asp" method="post" 
onsubmit="return checkFormO"> . , , , , 

<table width="100%" border="0" censpacing="2" cellpaddTng= 2 > 
<tr align="center"> ^ . 

<td colspan="2"><font face="verdana, Anal, Helvetica, sans-senf 

size="2"><b>l . , . /, ^ /^j 

would like to send <%=sName%>'s eYardSign to</b></font></td> 

</tr> 

<tr bgcolor="#92A6F8"> , ^ „^„^ ^ „„ . ^ 

<td width="50%" align="left" valign="bottom" bgcolor="#92A6F8' xfont 
face="verdana, Arial, Helvetica, sans-serif" size="2"> 

<b>Your Name<font color="red">*</font></b></font></td> 
<td width="50%"> 

<input name="name"> 
</td> 
</tr> 

<tr bgcolor="#BBC8FB"> „ ^ ^ „ . ■ t 

<td width="50%" align="left" valign="bottom"><font face= 'Verdana, Anal, 
Helvetica, sans-serif" size="2"><b>Email 

Address <font color="red">*</font></b></font></td> 
<td width="50%" bgcolor="#BBC8FB"> 

<i nput name="emai 1 "> 
</td> 
</tr> 

<tr bgcolor="#BBC8FB"> ^ ^ .. j ■ 

<td width="50%" align="left" valign="bottom"><font face= Verdana, Anal, 

Helvetica, sans-serif" size="2"><b> 
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Gender <7b><font size="l"> </font></font></td> 
<td width="50%" bgcolor="#BBC8FB"> 
<select name="gender"> 

<option>-Select- 

<option value="M">Male<option 

value="F">Female 

</select> 

</td> 
</tr> 

<tr bgcolor="#BBC8FB"> . . . „ . 

<td width="50%" align="left" valign="bottom"><font face= Verdana, Anal, 
Helvetica, sans-serif" size="2"><b> 

Zip code </b><font size="l"></font> </font></td> 
<td width="50%" bgcolor="#BBC8FB"> 

<input name="zipcode"> 
</td> 
</tr> 

<tr bgcolor="#D7DEFD"> . . „ . 

<td width="50%" align^'Heft" valign="top"><font face="Verdana, Anal, 
Helvetica, sans-serif" size="2"><b>Type . .m„ . r-J 

emails here<font color="red">*</font></b><font size= 1 ><br>(Type out 
complete email address, for more than one email 

separate by "comma" eg; namel@companyl.com, 
name2@company2 . com)</font></font></td> 
<td width-" 50%"> 

<textarea cols="40" name="emails" rows="10"></textarea> 
</td> 
</tr> 

^^<td colspan="2" align='Vight" valign="bottom" height="5"></td> 
</tr> 

_ . : align="center"> 

- <td colspan="2" valign="bottom"> ^ ^ . . o u 

<input type="submit" name="Submit" value="Forward eYardSign >  
<input type="button"^ name="buttonl" value="Cancel" 
oncl i ck="iavascri pt : wi ndow. close()"> 
</td> 

<tr^itd colspan="2"><font face="Verdana, Arial, Helvetica" si ze="2"><b> 
<f ont col or=:" red">*</f ont>&nbsp ; Requi red inf ormati on</b></f ontx/tdx/t r> 
</tabl e> 

<input type="hidden" name="id" value="<%=:sTrack_id%> > 
<input type="hidden" name-"user" value=:"<%=suser„id%>"> 
</form> 

<%else%> ^ . „ 

<!-- #include file="inc/database_inc — > 

<% 

set JMail = server. CreateObject("3Mail .SMTPMail") 
set rs ^ server. CreateObjectC"ADODB. Recordset") 

sTrack-id = Request . Form("id") 

sSQL = "INSERT INTO sendtof rei nd„ref erer 
Ctrack-id, user_id, name, email ,send_date, gender, zipcode) VALUES (" +_ 

sTrack_id + "," + Request. formruser") + ",'" + Request . Form("name") + "',' 
4- Request. Form("email") + "\r + „ ^ „ , 

cstr(Now) + "#,'" + Request- FormC'gender") + " + 
Request. FormC'zipcode") + " *)" 

db. Execute sSQL 

rs.Open "SELECT referer.id FROM sendtofrei nd_ref erer order by referer_id 

DESC",db 
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sReferer„id = cstr(rs(0)) 
rs. close 

sArr.emails = split(Request . FormC'emails") , " , ") 

for i = 0 to UBoundCsArr_emails) 

if not trim(sArr„emails(i)) = then 

sSQL = "INSERT INTO sendtof rei nd_emai 1 s ( ref e re r„id, email 

VALUES C' + _ 

sReferer_id + + trim(sArr_emailsCi)) + 
db. Execute sSQL 

DMail .AddRecipientBCC trim(sArr_emails(i)) 

end if 

next 

'insert number of send to freinds in eYardsign Responses 
SSQL = "SELECT COUNT(*) FROM sendtof rei nd_ref erer WHERE track_id = + 
sTrack_id 

rs.open sSQL,db 

SSQL = "UPDATE Mai l_Tracki ng set Number_Sendtof riend = " + cstr(rs(0)) + 
WHERE track_id = " + sTrack_id 
db. Execute sSQL 
rs. close 



Start Yardsign 



SSQL = "select * from Mail_Tracking where track_id = " + sTrack_id 
rs.open sSQL,db 



rsposition = rs("Position") 
-Mmage = rsC'design") 

sEmail = Request. Form("email") 

sMessage = rs("Message") 

sFirst_Name = rs("Fi rst^Name") 

sLast_Name = rs("Last„Name") 

ssubject = "Check this out" 

sLogo = rs("logo") 

sMusic = rs("mu5ic") 

suser = rs("user_id") 

sSiteURL = "http://www.eyardsigns.com/" 
bFault = true%> 

<!— #include file="inc/top_mail .inc" — > 

<% 



Sel ect 


case simage 












case "!"%> 




file="inc/yardl. 








<! — 


#inc1ucie 


inc" 


--> 


<% 


case "2"%> 




file="inc/yard2. 






<! — 


#include 


inc" 


--> 


<% 


case "3"%> 




file="inc/yard3. 






<! — 


#inclucle 


inc" 


— > 


<% 


case "4"%> 




file="inc/yard4 








<! — 


#include 


inc" 


— > 


<% 


case "5"%> 




fi1e="inc/yard5 






<!-- 


#inc1ude 


inc" 


— > 



<%end select 
• Lower%> 

<!-- #include file="inc/bottom_mail .inc 
<%call insertButtonsQ 
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'This is the local SMTP server 

3Mai1 .ServerAddress = "mailhub.registeredsite.com" 

'This is user. . . . 

JMail .Sender = sEmail 

JMail .Subject = sSubiect 

JMail .ContentType = text/html" 

jMail -AddRecipient "forward@eyardsigns.com" 
'3Mail .AddRecipientBCC sReciever 

jMail.Body = sBody + sBodyl 
JMail .Priority = 3 
' send it. . . 
JMail -Execute 

I 

• End Yardsign 



rs. Close : set rs = nothing 

db. close : set db = nothing . ^ ^ ■ .o. 

Response. Write "<br><br><br><br><p align='center xfont size=: 2 

face- ^^fi*^^^^^g^^^|^ ^ "^sans-serif '><B>eYardsign forwarded. <BR><BR>Thank you.</B>" 
Response. write "<br><br><br><br>" 

Response. write "<a href=' javascript rwindow. closet) >Close 
wi ndow</a></f ont></p>" 
end if%> 

</td> . , , 

<td width="20" bgcolor="COD5FC"> </td> 

<:/tr>^ 

<td width="20"><img src="grfx/pop_corner3.gif" width="20" height="20"></td> 
<td width=:"74" bgcolor="C0D5FC"> </td> 

<td width-"486" bgcolor="C0D5FC"> </td> . „ 

<td width="20"><img src="grfx/pop_corner4.gif " width="20" heights 20 ></td> 
</tr> 
</tabl e> 

</body></html> , „ 

<[-- #include file="inc/lnsertButtons.inc --> 
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<%@ Language=VBScript %> 

<html><heaa><title>List of send to Freind</title> 
<script language='*javascript"> 
function checklist () { 

if (document. moveemai Is. movemai Is. value == "0") { 

a1ert("Please select a list"); 

return false; 

} 

} 

</script> 

<!-- #include file="inc/session_timeout.inc" --> 
<!— #include file="inc/top_inc.inc" 
<!-- #include file="inc/database.inc" --> 

<td align="center" valign="top"><%'Code start%> 

<font face=' Verdana, AriaV size=' 3 '><B>send to a 

Friend Li st</f ont></B><BR><BR> ..... 

<%set rs = server.CreateOb3ectCADODB. Recordset ) 
set rsl = server, createObject("ADODB. Recordset") 
set rs2 = server. CreateObject("ADODB. Recordset") 
set rs3 = server. CreateObject("ADODB. Recordset") 

sTrack_id = Request .QueryStringC"id") 

'Start Move Mail code 

if not sTrack_id = "" then 

'Move these addresses to which list 

sSQL = "Select a.list_id,a.list_name FROM 

list AS a, user_list_link AS b WHERE " + _ .... » 

"a.list_id = b.list_id and Cb.user_id = " + 



SessionC"user") + " OR user^id - 1)" 



LiSt-</0'PTION>" 



rs2.0pen sSQL,db 

sList = "<0PTI0N value='0*>-select 



do until rs2.E0F 

SSQL = "SELECT COUNTC*) FROM email 
WHERE user_id = " + Session("user") + " AND list_id = " + cstr(rs2C0)) 

rs3.0pen sSQL.db 

sNumber = " (" + cstrCrs3(0)) + ")" 
rs3. close 

SList = SList + "<0PTI0N value='" + 
cstrCrs2C0)) + "-" + rs2(l) + "'>" + rs2(l) + sNumber + "</OPTlON>" 

rs2.MoveNext 

loop 

if not SList = "" then%> 
<form name="moveemails" method="post" 
action="movemails.asp" onsubmit-" javascript: return checkList()"> _ 

<font face=' Verdana, Helvetica, AnaV 



size='2'> 

name="movemai 1 s"><%=sLi st%></sel ect> 

val ue="<%=sTrack_i d%>"> 
val ue="sendtof rei nd"> 
val ue="sendtof ri end_l i st . asp"> 
value-"Go"> 



Select list to add addresses to: <BR><select 
</font> 

<input name="id" type="hidden" 
<input name="table" type="hidden" 
<input name="ref" type="hidden" 
<input name="submitl" type="submi t" 



</forni> 
<%end if 

end if 

'End Move Mail Code%> 
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<table width="98%" border-'^O" cell spaci ng="l" 

cellpadding="r align="CENTER"> „ . . . „ „ x 

<TR bgcolor="C0D5FC xtd align="center"><font 

face=' Verdana, AriaV size='2' ><B>Name</B></font></td> ^ . . . ^, 

<td align="center"><font face=' Verdana, Anal 

size='2' ><B>Date-Time</B></font></td> , , 

<td align="center"><font face=' Verdana, Anal 

size='2' ><B>Gender</B></font></td> .... - n, 

<td align="center"><font face=* Verdana, Anal 

size='2' ><B>zi p Code</B></f ont></td> ^ , . . 

<td align="center"><font face= 'Verdana, Arial 

si ze= ' 2 ' ><B>Emai 1 s</B></f ontx/tdx/t r> 

<% 

if sTrack_id = then 
sSQL = "select 

referer i d, name, emai 1 ,send_date, gender, zipcode from sendtof reind„ref erer " + _ 

"WHERE user_id = " + SessionC'user") 

'Date 

if not Request. Form("sdate") = AND not 

Request. Form("edate") - then 

sSQL = sSQL + AND (send_date 

BETWEEN #" + Request. Form("sdate") + "# and #" + . „ 

Request, FormC'edate") + #) 

end if 
'gender 

if not Request. FormC'gender") = "0" then 
SSQL = SSQL + " AND gender - '" + Request . Form("gender") + "'" 

'zipcode 

- - ^ if not Request. FormC'zipcode") = then 

SSQL = s^L + " AND zi pcode like + Request . Form("zipcode") + " "' 

SSQL = SSQL + " order by send_date" 

else 

SSQL = "select . 

referer_id, name, email, send^date, gender, zipcode FROM sendtof reind_referer WHERE 

track_id = " + _„ . . , _, n 

sTrack^id + order by send_date 

end if 

'Put the RNC data in tables 
'sSQL = "INSERT INTO sendtof rei nd__ref erer 
(referer_id, name, email ,send_date, gender, zipcode) FROM sendtof rei nd_ref erer WHERE 

track_id = " + „ , , ^ ^ n 

'sTrack„id + order by send_date 

rs.Open sSQL,db 

if rs.EOF then ^ _ 

Response.wri te "<TR><TD colspan= 5 
bgcolor='#D9E6FD'><font face=' Verdana, AriaT size='2'>No records 
found.</f ontx/tdx/t r>" 

else 

do until rs.EOF 

SSQL = "SELECT email from 

sendtofreind_emails where referer_id = " + cstr(rs(0)) 

rsl.Open sSQL,db 

if not rsl.EOF then sEmails = 

rsl.Getstring(,," ",". "," ") 

rsl-Close %> 

<tr><td bgcol or=:"#D9E6FD"><f ont 
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face=' Verdana, Arial' size='2'> 

<a 

h ref ="mai 1 to : <%-rs (2)%>"><%=rs (l)%></a></f ont></td> 

<td align="center" 

bgcolor="#D9E6FD"><font face=' Verdana, Arial" size='2'> <%=rs(3)%></font></td> 

<td align="center" bgcolor="#D9E6FD" 

xfont face=' Verdana, Arial ' size='2'> <%=rsC4)%></font></td> 

<td align="center" 

bgcolor="#D9E6FD"><font face=' Verdana, AriaT size='2'> <%=rs(5)%></font></td> 

<td bgcolor="#D9E6FD"><font 
face=* Verdana, Arial ' size='2'> <%=sEmails%></font></td></tr> 

<%rs.MoveNext 

loop 

end if 

rs. close : set rs = nothing 
db. close : set db = nothing 
if Request. Form(" ref") = then sRef = 
"tracking. asp" else sRef = request. form("ref")%> 

</table><form> 

<input type=button value="Back" 
oncl i ck="document . 1 ocati on= ' <%=sRef%> ' " name=buttonl></f orm> 
<%'code end%> . „ 

<!-- #include file="inc/bottom_i nc.inc — > 
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<%@ Language=VBScript %> 

<html> 

<head> 

<title>Send to a Freind</title> 
<scri pt 1 anguage=" JavaScri pt "> 
function checkFormC) { 
errorFields = 

if (trim(document. SIGNUP. name. value) { 
errorFields Enter your name.\n"; 

} 

if (! isEmailVal id (document. SIGNUP.email -value)) { 

errorFields += Enter a valid email address in the form 
xxxSxxx . XXX . \n\n " ; 

} 

if Ctrim(document. SIGNUP. emails. value) "") { , 

errorFields += Enter email addresses you want the eYardsign 
forwarded to.\n"; 

} 

//Check other email addresses 

s Emails = string(document. SIGNUP. emails. value) 

sEmail_split = sEmails.splitC", ") 

f 0 r (i =0 ; i <s Emai 1 _spl i t . 1 engt h ; i ++) { 

if C!isEmailvalid(sEmail_split[i])) { 

errorFields += Error encountered in email address number 
" + string(i+l) + " mispelled as " + sEmail_split [i] + "\n"; 

} ^ 

- :^ ..^f^(;gprQPP^g-|d5 != "") { ... 

— errorFields = "Please correct the following errors, then resubmit 

the form. Thank you.\n\n" + errorFields; 

alert (errorFields) ; 

return false; 

} 

else { 

return true; 
} 

} 

</script> 

<script language="3avascript" src-"src/utils. js"></script> 
</head> 

<body bgcolor="#003399"> „ „ . . 

<table cellspacing="0" cell Padding="0" width="600" align="center" border= 0 > 

^^<td align="right" width="20"><img height="20" src="grfx/pop_cornerl_rnc.gif " 
widths" 20"></td> 

<td width="79" bgColor="#FFFFFF"> </td> 
<td width="480" bgColor="#FFFFFF"> </td> 

<td align="left" width="2r'><img height="20" src="grfx/pop_corner2_rnc.gif 
width-"20"></td> 
</tr> 
<tr> 

<td width=:"20" bgColor="#FFFFFF" height="69"> </td> . 
<td width="79" bgColor="#FFFFFF" height="69"><a href="http: //www. rnc.org/ xirag 
src="grfx/welcome3-gif" width=:'79" border="0" height="67"></a> 

<td^align-"middle" width="480" bgColor="#FFFFFF" height="69"> 
<%Set ad = Server. CreateObject("MSWC.AdRotator") %> 

<%= ad.GetAdvertisement("inc/adrot_lngl.txt") %> 

</td> 

Page 1 



sendtof ri end_RNC . asp 
<td width="21" bgC6lor="#FFFFFF" height="69"> </td> 
</tr> 

*^^<td width="20" bgColor="#FFFFFF" height="2"><img height="l" 
src="grfx/bluespacer.gif" width="l"></td> , 

<td width="79" bgcolor="#c0d5fc" height="2"><img height="l" 
src="grfx/bl uespacer.gif" width="l"></td> 

<td width="480" bgColor="#cOd5fc" height="2"><img height="l" 

src="grfx/b1uespacer.gif" width="l"></td> , 

<td width="21" bgColor="#FFFFFF"><img height="l" src="grfx/bl uespacer.gif 
width="l"></td> 
</tr> 

<td width="20" bgCo1or="#FFFFFF"> </td> . , 

<td co1Span="2"><img height="20" src="grfx/logo_half .gif'ximg height= 20 
s rc="g rf x/1 ogo_hal f 2 . gi f " wi dth="60"></td> 

<td width="21" bgcolor="#FFFFFF"> </td> 
</tr> 

^^<td width="20" bgColor="#FFFFFF" height="0" rowspan="2"> </td> 
<td vAlign="top" align="middle" bgColor="#FFFFFF" colSpan="2"> 
<%if Request. FormC'emai Is") = "" then%> 

<rorm name="SlGNUP" onsubmit=" return checkFormO" 
action="sendtofriend_RNC.asp" method="post"> ,.,«„o/" 

<table censpacing="0" cellPadding="0" width="100%" 

border="0"> 

<tr bgColor="#92a6f8"> 

<td vAlign=" bottom" aTign="left" bgColor="#FFFFFF > , 
<font face="verdana, Arial, Helvetica, sans-serif STze= 2 
col or="#000000"><b> Your Name 
</b></font> 
</td> 

— <td bgcolor="#FFFFFF"> 
<input name="name"> 
</td> 
</tr> 

<tr bgColor="#bbc8fb"> 
<td width=150 align="left" bgco1or="#FFFFFF"> . 
<font face="verdana, Arial, Helvetica, sans-senf size= 2 
color="#000000"><b>Email Address</b></font> 
</td> 

<td bgColor="#FFFFFF"> 
<input name="email"> 
</td> 

^tr'"align="middle" bgcolor="#003399"> 

<td colSpan="2" height="24"><font face="verdana, Anal, Helvetica, 
sans-serif" size="2" color="#FFFFFF"><b>l would like to send GOP eYardSigns 
to : </b></f ont></td> 

</tr> 

<tr bgColor="#d7defd"> . ^ „ ^ 

<td vAlign="top" align="left" width="50%"><font face="verdana, Anal, 
Helvetica, sans-serif" size="2"><b>Type Recepients 
emails here</b><font size="r'><br> 

(Type out complete email address, for more than one email address 
separate by "comma" eg; <nobr>l@rnc.org, 
2@rnc . org</nobr>)</f ont></font></td> 
<td width="50%"> 

<textarea name="emails" rows="10" cols="50"></textarea> 
</td> 
</tr> 

^^<td vAlign="bottom" align="right" colSpan="2" height="91"> 
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<tab1e width="100%" border="0" censpacing="0" cellpadding="0"> 
<tr bgcolor="#003399"> 

<td colspan="2" height="27"> 

<div align="center"><font color="#FFFFFF" face='Verdana, Aria! 
Helvetica, sans-serif "xbxfont size="2">Stay 

lnformed</font> </b></font><font 
col or="#FFFFFF"> (opti onal ) </f ontx/di v> 
</td> 
</tr> 

<td colspan="2"><font color="#003399'* face=:"Verdana, Arial, 
Helvetica, sans-serif" size="2">Feedback 

<input type="checkbox" name="feedback" value="Yes"> 
Please keep me informed via email </font></td> 
</tr> 

^^<td valign-"middle" width="23%"> 
<div align="left"> 

<input type="text" name="zipcode" size="20"> 
</div> 
</td> 

<td width="77%" valign="middle"><font color="#003399" 
face="verdana, Arial, Helvetica, sans-serif" size="2">zip 

code if you want to be kept informed about the 2000 

campai gn</f ont></td> 
</tr> 
</tabl e> 
</td> 
</tr> 

<tr align=:"middle"> 

<td vAlign="bottom" colSpan=:"2" height="38"> 
_ - : <input type="submit" value="send a eYardSign" name="submit"> 

  „ 
<input onClick="javascript:window.closeO" type="button 
val ue="Cancel " name="buttonl"> 
</td> 
</tr> 

<input type="hidden" name="id" value="250"> 
<input type="hidden" name="user" value="32"> 
</form> 

</table> 

<%else%> 

<!-- #include file="inc/database.inc" --> 

<% 

Set 3Mail = server. CreateObject("3Mail .SMTPMail") 
set rs = server,CreateObject("ADODB. Recordset") 

sTrack_id = Request . Form("id") 
suser = Request. FormC"user") 

sSQL = "INSERT INTO sendtof rei nd_ref erer 
(t rack„id,user_id, name, emai 1 ,send„date, gender, zipcode) values (" +_ 

sTrack_id + "," + suser +",'"+ Request . Form("name") + "','" + 
Request. Form("email") +"',#"+ . 

cstrCNow) + "#,'" + Request. FormC"feedback") + " + 
Request. Form("zipcode") + " 



db. Execute sSQL 

rs.Open "SELECT referer_id FROM sendtof rei nd_ref erer order by referer_id 

DESC",db 
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sReferer_id = cstrCrs(O)) 
rs, Close 

sArr_emails = splitCRequest.FormC'emails") 

for i = 0 to UBound(sArr_emails) 

if not trim(sArr„emails(i)) = then 

sSQL = "INSERT INTO sendtof rei nd_emai I s Creferer„id,emai 

VALUES ( + _ sReferer_id + + trimCsArr_emailsCi)) + 

db. Execute sSQL . 
DMail .AddRecipientBCC tn'mCsArr.emailsO)) 

end if 

next 

'Insert number of send to freinds in eYardSign Responses 
SSQL = "SELECT COUNT(^) FROM sendtof rei nd_ref erer where track_id = + 
sTrack_id 

rs.open sSQL.db 

SSQL = "UPDATE Mai l_Tracki ng SET Number„Sendtof riend = " + cstrCrsCO)) + 
WHERE track_id = " + sTrack_id 
db. Execute sSQL 
rs. close 



« start Yardsign 

I 

SSQL = "Select * from Mail_Tracking where track„id = " + sTrack_id 

rs.open sSQL.db 

- : ^ -sEiiail = Request. Form("email") 
subject = "Your GOP eYardsign" 
suser = "32" 

sSiteURL = "http://www.eyardsigns.com/" 

bFault = true%> , . „ 

<!— #include file="inc/rnc/yard_rncl.inc ~> 

<% 

'This is the local SMTP server 

DMail -ServerAddress = "mailhub.registeredsite.com 

'This is user 

jMail. Sender = sEmail 

jMail .Subject = sSubiect 

jMail .ContentType = ^'text/html" 

jMail .AddRecipient "forward@eyardsigns.com" 
'3Mail .AddRecipientBCC sReciever 

DMail.Body = sBody + sBodyl 
3Mail - Priority = 3 
' Send it. . . 
JMail .Execute 



' End Yardsign 

I 



rs. Close : set rs = nothing 
db. close : set db = nothing%> 



Page 4 



sendtof ri end_RNC . asp 
<br><br><br><br><font face="Verdana, Arial, Helvetica, sans-serif"> 
<font size="6">Your</font> <br><font size="6"><b>eYardSign</b></font> 

<br><font si2e="6">has been sent</font> 

<p><font size="6">THANK YOU</font></p><br><br> 

<%end if%> 

<br><br> 

<td^width="21" bgColor="#FFFFFF" height="0" rowspan="2"> </td> 
</tr> 

^^<td align="middle" bgColor-"#FFFFFF" colSpan="2"> 

<font size="l" face-"Verdana, Arial, Helvetica, sans-senf > 
<a href="http://www.electionman -com" target="_blank"><img 
src="grfx/electionmallpower.gif" border="0" WIDTH="127" HElGHT="60"></a><br> 

Paid for , ^ , . . ^ -^^ 

by the Republican National Committee © 2000 Republican National Committee. 

<br> 

All rights reserved. </font> 

</td> 
</tr> 

^^<td width="20" height="16"><img height="20" src="grfx/pop_corner3„rnc.gif" 
width-^20^></td>^^^ bqColor="#FFFFFF" height="16">  </td> ^ 

<td width="21" height="16"><img height="20" src-"grfx/pop„corner4_rnc,gif 
width="20"></td> 

</tr> 
</table> 
</body> 
</html> 
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<%@ Language=VBScript %> 
<html> 

<!-- #include file="inc/session_timeout .inc" --> 
<[-- #include file="inc/top„inc.inc" --> 

<td align="midd1e"><%'Code start%> 
<form method="post" name="fornil" 
acti on="sendtof ri end_l i st . asp"> 

<table border="0" cellPadding^"!" cellspacing^"!" width="98%"> 
<tr> 

<td colspan="3"><font size="3" face="verdana, Arial, Helvetica, 
sans-serif "><b>Search send to f riends</b><br> 

<font size="l">Leave the fields blank to get all 
records</font></font><br><br></td> 
</tr> 
<tr> 

<td width="15%"><font size="2" face=" Verdana, Arial, Helvetica, 
sans-serif "><b>Date</b></font></td> 

<td width="25%"><font size="r' face=" Verdana, Arial, Helvetica, 
sans-serif ">Start Date (MM/DD/YY)</font><br> <input name="sdate" 
val ue="<%=date%>"></td> 

<td><font size="l" face=:"Verdana, Arial, Helvetica, sans-serif ">End Date 
ClviM/DD/YY)</font><br> <input name="edate" value="<%=date%>"></td> 
</tr> 
<tr> 

<td><font size=:"2" face:=" Verdana, Arial, Helvetica, 
sans-serif "><b>Gender</b></font></td> 

<td colspan=:"2"> <select name="gender"> 

<option value="0">-Select- 
<option value="M">Male<option 

value="F">Female 

</select></td> 

<t r> 

<td><font size="2" face="'Verdana, Arial, Helvetica, 
sanS"Serif"><b>zip-code</b></font></td> 

<td colspan="2"><input name="zipcode"></td> 

<tr><td colspan="3" align="center"><br><input type="button" name="buttonl" 
val ue="Back" oncl i ck=" j avasc ri pt : document . 1 ocati on= ' def aul t . asp * "> 

<input type=:"submit" nanie="submitl" value="Search"></td></tr> 
</table> 

<input name="ref" type="hidden" value="sendtof riend_search.asp > 
</form><l— #include file="inc/bottom_inc.inc" --> 
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<%@ Language=VBScript %> 
<%Response . Expi res=0 
Response. Cl ear%> 
<html> 
<head> 

<title>eYardSign sent</title> 

<!-- #include file="inc/session_timeout .inc' --> 

<!-- #include file="inc/top_inc.inc" --> 

<!__ #include file="inc/databa5e.inc" --> 

<td width="98%" a1ign= 'center'^ 

<% *on error resume next 

const iNo_emails =20 , „^ 

set rs = server. CreateObjectC"ADODB. Recordset ) 

set rsl = server. createObjectC'ADODB. Recordset") 

suser = Session("user") 

if Request. Form("one_email") = then ^ 
sArr_Lists = split (Request. Forrri( select! ), , J 
for i = 0 to UBound(sArr„Lists) 

if not sArr_ListsCi) = then ^ 

sArrList = splitCsArr_ListsCi) , - ) 
sListiD = sListiD + " + SArrList (0) 
sListName = sListName + " + SArrList (1) 

end if 

^^^'^ , , . ^ 

SListName = right(sListName,len(sListName)-l) 

SListiD = right(sListlD,len(sListiD)-l) 

sSQL = ''Select email from email where user_id = " + sUser + " and (" 

/ - ■ * ^ sArr_ListID = split(sListlD, " , ") 

'select emails from different lists 
for i =: 0 to UBoundCsArr_ListlD) 

if not sArr„ListlD(i) = then sSQL = sSQL + list„id = + 

sArr_ListlD(i) + " or " 
next 

SSQL = left(sSQL,lenCsSQL)"3) + 
rs.Open sSQL,db 

if rs.EOF then , - ^. » 

Response. write "<SCRIPT Language=' DavaScnpt > 
Response. write "smsg = 'no email addresses found in the 

listCs) you selected. \n ^^^p^^^^^^^^^g n^^^g ^ 3^3g ^ -please add email addresses to 

listCs) ' " " 

Response. write " if (confi rmCsmsg))" 

Response. write 
document . 1 ocati on= ' emai l_mai ntenance . asp ' ; " 

Response. write " else . , „ 

Response. write " history .backQ ; 

Response. write "</SCRlPT>" 

end if 
rs, close 

else 

bOne_Mail = true 

end if 

set 3Mail = server. CreateObjectC'JMail .SMTPMail") 
'check if eyardsign or ecard 
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if Request. FormC'ecard") = then 

sPosition = Request . FormC'sPosition") 
sTitle = Request. FormC'sTi tie") 
simage = Request. Form("slmage") 
sEmail = Request. FormC'sEmail") 
sMessage = Request. FormC'sMessage") 
sFirst_Name = Request . FormC'sFname") 
sLast„Name = Request . FormC'sLname") 
ssubject = Request. FormC'sSubject") 
sLogo = Request. Form("sLogo") 

sSiteURL = Request. Form("5SiteURL") 
sMusic = Request. FormC"sMusic") 



'Add entry in Tracking List 
sSQL = "INSERT INTO Mai l_Tracki ng 



(user_i d , Mai l_Date , Fi rst„Name , Last.Name , Ti tl e , posi ti on , desi gn , message , " + 

"return_email , logo, music) VALUES (" + suser + + cstr(Now) + 

" ' , + SMessage + 



+ sFirst_Name + , + _ 

sLast_Name + + sTitle + 

"' , '" + sEmail 
sLogo + "\ '" + sMusic + "')" 
db. Execute sSQL 



+ SPosition + + simage + 



'Get Track_id , ...... ^ 

rsl.Open "Select * from Mail_tracking order by track_id ,db,2,2 
rsl.MoveLast 

sTrack„id = cstr(rsl(0)) 

- - ^ if bOne^Mail = false then 

_ 'Add entry in Track_list 

for i = 0 to UBound(sArr_ListID) 

if not sArr„ListlD(i) = "" then 

SSQL = "INSERT INTO Mai iTracki ng_Li st.Li nk 
Ctrack_id,list„id) VALUES C" + sTrack_id + "," + sArr_ListlD(i) + ")" 

db. Execute sSQL 

end if 

next 

end if 
'Upper 

bFault = true%> 

<!-- #include file="inc/top_mail .inc" 
<%• start Yard sign 
Select case simage 
case "!"%> 

<!- 
case "2"%> 

<!- 
case "3"%> 
<!- 

case "4"%> . „ 

<!— #include file="inc/yard4.inc" 



--> 



<% 
<% 
<% 



#include file="inc/yardl.i 
#include file="inc/yard2.i 
#include file="inc/yard3.i 



case "5"%> 



nc' 
nc' 
nc' 



<!-- #include file="inc/yard5.inc" 



-> 
-> 
-> 
-> 
-> 



<% 



<%end select 
' Lower%> 

< ! -- #i ncl ude f i 1 e="i nc/bottom_mai 1 . i nc" 
call insertButtonsO 



'Add Remove me line 
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sBodyl = sBodyl + chrC13) + "<BR>To remove yourself from this list 

click here : <a href='" + _ .,, • 

sSiteURL + "remove_email .asp?id=" + suser + '> + sSiteURL + 

"remove_email .asp?id=" + sUser + "</a>" 

DMail.Body = sBody + sBodyl 
JMail . Priority = 3 

else 

'If its an ecard 

sEmail = Request. Form("email") 

sBody = sBody + "<HTML><BODY><font face=arial size=2>if the Card 
below does not show up correctly, click here: </font>" , ^ , . /m 

sBody = sBody + "<a href=http: //www. eyardsigns.com/grfx/ecards/ + 

Request. Form("ecard") + / r- , . /i. 

SBody = sBody + "http://www.eyardsigns-com/grfx/ecards/ + 

Request. Form("ecard") + "</a>" 

SBody = sBody + "<BR>" 

sBody = SBody + "<img src=http://www. eyardsigns.com/grfx/ecards/" + 

Request. FormC'ecard") + ^ ^ ^ . ^ . ^ „ 

sBody = sBody + "<BR><BR><font face=Anal sTze=2> + 

Request. FormC'sMessage") + "</body></HTML>" 
JMail. Body = sBody 

end if 

'This is the local SMTP server 

DMail .ServerAddress = "mailhub.registeredsite.com 

'This is User 

JMail. sender = sEmail 

JMail -Subject = Request . Form("sSubject ) 
- - ■ * ' - JMail .ContentType = "text/html" 
'JMail .ReturnReceipt = true 

' Send it. . . 

if bOne_Mail then 

sReciever = Request .FormC'one_email j 

JMail .AddReci pi entBCC sReciever 

JMail .Execute 



else 
+ " and (" 



SReciever = right(sListName,len(sListName)-l) . 

sSQL = "select email from email where user_id = + SessionC user ; 

sArr_ListlD = split(sListlD," , ") 



'Select emails from different lists 
for i = 0 to UBound(sArr_ListlD) 

if not sArr_ListlD(i) = then sSQL - sSQL + list„id = + 

sArr_ListlD(i) + " or " 
next 

SSQL = left(sSQL,len(sSQL)-3) + 

'Add Recipients 
rs.Open sSQL,db,l,l 

if not rs.eof then 

iinc = fixCrs.RecordCount/iNo_emails) 

for i = 0 to iinc 

JMail .AddReci pi ent sEmail 
for j = 1 to iNo_emails 
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JMai I .AddRecipientBCC rs(0) 
'Check for EOF 
rs.movenext 

if rs. eof then exit for 

next 

jMail .Execute 

jMail .ClearRecipients 

next 

end if 

end if 



JMail .Close 

'rs. close : set rs = nothing 
db. close : set db = nothing%> 
<center> 

<font size="3" face="Verdana, Arial, Helvetica, sans-serif"> 

<b>Thank you <%=sFi rst_Name%></b><br> 

</font> 

<img SRC="grfx/thanks.gif" BORDER="0" ALT="Thanks" WIDTH="218" 
HEIGHT="58"><br> 

<font size="2" face="verdana, Arial, Helvetica, sans-serif"> 

Your evardsign has been sent to <b><font 
color="092186"><%^5Reci ever%></font></b><br><br> 

<a href=:"default.asp">Continue. . .</a> 

</font> 

<!-- #include file="inc/bottom_inc.inc" --> 
<!-- #include file="inc/InsertButtons.inc" --> 
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<%(& Language=VBScript %> 
<%Response . Expi res=0 
Response, clear%> 
<html> 
<head> 

<title>eYardSiQn sent</title> 
<!-- #include Tile="inc/top_inc. inc" --> 
<!-- #include file="inc/database.inc" --> 
<td width="98%" a1ign="center"> 
<% 'on error resume next 

const iNo„emails = 20 

set rs = server. CreateObjectC'ADODB. Recordset") 
suser = "32" 

sEmail = "rnc@eyardsigns.com" 

sSubject = "check this out, its cool man" 

Set JMail = server. createobj€ct("JMail .SMTPMail") 
'This is the local SMTP server 

JMail .serverAddress = "mailhub.registeredsite.com" 

'This is User. . . . 

3Mail. Sender = sEmail 

JMail .Subject = ssubiect 

JMail .ContentType = "^text/html" 

'3Mail .ReturnReceipt true 



sTrack_id = "250" 
suser = "32" 
'upper%> 

<!-- #include file="inc/rnc/yard_rncl.inc" --> 
'<% - --^ • - 

-Wlai 1 . Body - sBody 

' Send it. . . 

sSQL = "Select rnc_email from rnc_email" 
'Add Recipients 
rs.Open 5SQL,db,l,l 

if not rs.eof then 

iinc = fix(rs.RecordCount/iNo_emails) 

for i = 0 to iinc 

DMail .AddRecipient sEmail 
for j = 1 to iNo.emails 

JMail .AddRecipientBCC rs(0) 
Response.wri te rs(0) + "<BR>" 
'Check for EOF 
rs.movenext 

if rs.eof then exit for 

next 

Response. Write "donE" 

DMail .Execute 

DMail .ClearRecipients 

next 

end if 
JMail .Close 

'rs. close : set rs = nothing 
db. close : set db = nothing%> 
<center> 

<font size="3" face="verdana, Arial, Helvetica, sans-serif"> 
<b>Thank you <%=sFi rst_.Name%></b><br> 
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</font> 

<img SRC="grfx/thanks.gif" BORDER=:"0" ALT="Thanks" WIDTH="218" 
HEIGHT="58"><br> 

<font size="2" face="verdana, Arial, Helvetica, sans-serif"> 

Your eYardSign has been sent to <b><font 
color="092186"><%=sReciever%></font></b><br><br> 

<a href="default .asp">continue. _ ,</a> 

</font> 

<!-- #include file="inc/bottom_inc.inc" --> 
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<%(a Language=VBScript %> 

<HTML> 

<HEAD> 

<title>Terms of servi ce</title> 

</head> 

<body> 

<TABLE border=0 cellPadding^O cellspacing^O 7 7 7 7 r^^... 

style="WIDTH: 375pt; mso-cell spaci ng : Opt; mso-padding-alt: 7.5pt 7.5pt 7.5pt 7.5pt 

width=500> 

<TBODY> 
<TR> 

style=" PADDING-BOTTOM: 7.5pt; padding-left: 7.5pt; padding-right: 7.5pt; 

padding-top: 7.5pt"> „ . „ . , 

<p class=MsoNorma1><FONT face= Times New Roman size=3><SPAN 

stvle=" font-size: I2pt">l. acceptance of terms </span></font></p> 

<P^<F0NT face="Times New Roman" size=3><SPAN style="FONT-SlZE: 12pt">welcome to 

eT ecti onMal 1 . com ! . El ecti onMal 1 . com , , , . ^ , • 

provides its service to you, subject to the following Terms of semce- 
("TOS"). which may be updated by us from time to time without notice to 
you. In addition, when ■ tt ^u^m k« 

using particular ElectionMall .com services, you and ElectionMall .com shall be 
subiict to any posted guidelines or rules applicable to such services which may 
be posted from time to time. All such guidelines or rules are hereby 
incorporated by reference into the TOS. </SPAN></font></p> , 
<p><FONT face="Times New Roman" size=3><SPAN style= FONT-SIZE: 12pt >2. 
DESCRIPTION OF SERVICE </SPAN></FONT></P> 

<p><FONT face="Times New Roman" size=3><SPAN ,^^«cc t-n 

stvle=" FONT-SIZE: 12pt">El ecti onMal 1 .com currently provides users with access to 
a rich collection of on-line resources, including, various communications tools, 
^rilfne fdrtims, shopping services, personalized content and branded programming 
through n:s n4twork of properties (the "service"), unless explicitly stated 
otherwise, any new features that augment or enhance the current Service, 
including the release of new ElectionMall.com properties, shall be subject to 
the TOS. YOU understand and agree that the Service is provided AS-IS and that 
ElectionMan.com assumes no responsibility for the timeliness, deletion, 
mis-delivery or failure to store any user communications or personalization 
settings. <BR><BR>in order to use the service, you must obtain access to the 
world wide web, either directly or through devices that access web-based 
content, and pay any service fees associated with such access, in addition, you 
must provide all equipment necessary to make such connection to the World Wide 
web. including a computer and modem or other access device. Please be aware that 
El ecti onMal l.?om has created certain areas on the service that contain adult or 
mature content. You must be at least 18 years of age to access and view such 

<?><F6N?^fa?e="(iSS^ size=3><SPAN style=" FONT-SIZE: 12pt">3. YOUR 

REGISTRATION OBLIGATIONS </SPAN></FONT></P> l9„i."^Tn 

<p><FONT face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >ln 
consideration of your use of the service, you agree to: (a) provide true, 
accurate, current and complete information about yourself as prompted by the 
service's registration form (such information being the "Registration Data ) and 
Cb) maintain and promptly update the Registration Data to keep it true, 
accurate! current and complete, if you provide any information that is untrue, 
inaccurate, not current or incomplete, or ElectionMall.com has reasonable 
grounds to suspect that such information is untrue, inaccurate, not current 0 r 
incomplete, ElectionMall.com has the right to suspend or, terminate your account 
and refuse any and all current or future use of the service (or any portion 
thereof). </SPAN></font></P> ^ „ ^^^^ a 

<p><FONT face="Times New Roman" size=3><SPAN style= FONT-siZE: 12pt >4. 

ELECTI0NMALL.COM PRIVACY POLICY </SPAN></FONT></P> 

<p><FONT face="Times New Roman" size=3><SPAN , 

style=" FONT-SIZE: 12pt">Registration Data and certain other information about 
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you is subject to our Privacy Policy and may be used for political 

fp^:fiS"fac4:<^TiJ;2r;ien™^? size.3><SPAN style="FONT-SIZE: 12pf>5. MEMBER 

^iTJ^ si^"l?.Ti;^s?S5*Se."roNT-sizE: i2pt>vou .m 

receive a password and account designation upon completing the Service s 
reaistration process, you are responsible for maintaimng the confidentiality ot 
the password and account, and are fully responsible for all activities that 
occur under your password or account. You agree to (a) immediately notify 
ElectionMan.com of any unauthorized use of your password or account or any 
other breach of security, and (b) ensure that you exit from your account at the 
end of each session. ElectionMall .com cannot and will not be. liable for any loss 
or damage arising from your failure to comply with this Section 5. 

%l<Flm^fTcZ"Tile5 New Roman" size=3><SPAN style=" font-size: 12pt">6. member 

^?SSTllce="?(S^5:ii'R^ size=3><SPAN style=" FONT-SIZE: 12pt">You 
understand that all information, data, text software, music sound 
photographs, graphics, video, messages or other materials C content ), whether 
publicly posted or privately transmitted, are the sole responsibility of the 
person from which such content originated. This means that you, and not 
ElectionMan.com, are entirely responsible for. all content that you upload, 
ooit email or otherwise transmit via the Service. ElectionMall .com does not 
Control the Content posted via the Service and, as such, does not guarantee the 
a?S?acy integrity or quality of such content. You understand that by using the 
service vou may be exposed to Content that is offensive, indecent or . 
obiTctionable undlr nS circumstances will ElectionMall .com be liable in any way 
for any content, including, but not limited to for. any errors or omissions in 
any Content, or for any loss or damage of any kind incurred as a result of the 
use of any content posted, emailed or otherwise transmitted via the Service. 

-<P><FSNT^racI="^^^^ New Roman" size=3><SPAN style=" FONT-SIZE: 12pt">You agree 

to not uTe the Service to:</SPAN></FONT></P> . 

<TABLE border=0 cenpadding=0 style="mso-cell spacing: 1.5pt > 

<TBODY> 
<TR> 

style=" PADDING-BOTTOM: 0.75pt; padding-left: 0.75pt; padding-right: 0.75pt; 
PADDING-TOP: 0.75pt" 

vAlign=top> , . „ . _ r-r.AKi 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN 
Styl e=" FONT-SIZE : 12pt">a . </SPAN></FONT></P></TD> 

style=" padding-bottom: 0.75pf, padding-left: 0.75pt; padding- right: 0.75pt; 

PADDING-TOP: 0.75pt"> . . „ . _ 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN ^^^^.^n*. 
stvle="FONT-SlZE: 12pt">upload, post, email or otherwise transmit any Content 
thkt is unlawful, harmful, threatening, .abusive, harassing tortious, 

vulaar obscene, libelous, invasive of another s privacy, naterui, 
or raci al ^y . et^ni cal 1 y o? otherwi se ib j ecti onabl e ; </span></FONT></p></TD></TR> 

<TR> 

styl e=" PADDING- bottom: 0.75pt; padding-left: 0.75pt; padding-right: 0.75pt; 
padding-top: 0.75pt" 

<P^c?ass=MsoNormal><FONT face="Times New Roman" size=3><SPAN 
styl e=" font-size: 12pt">b.</SPAN></F0NT></P></TD> 

sSle=" padding- bottom: 0.75pt; padding-left: 0.75pt; padding -right: 0.75pt; 

PADDING-TOP: 0.75pt"> . „ . , 

<p class=MsoNormal><FONT face=' Times. New Roman s]ze=3><SPAN 

styl e=" font-size: 12pt">harm minors in any way;</SPAN></FONT></P></TD></TR> 

<TR> _ 
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style=" PADDING-BOTTOM: 0-75pt; PADDING-LEFT: 0.75pt; PADDING- right: 0.75pt; 
PADDING-TOP: 0.75pt" 

vAlign=top> , 

<p cTass=MsoNormal><FONT face="Time5 New Roman si2e=3><SPAN 

styl e=" FONT-SIZE : 12pt ">c . </span></font></p></td> 

<TD 

Style="PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT: 0.75pt; 
padding-top: 0.75pt"> 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN 
style="FONT-SIZE: 12pt">impersonate any person or entity, including, but not 
limited to, a ElectionMall .com official, forum leader, guide or host, or false! 3 
state or otherwise misrepresent your affiliation with a person or 
enti ty ; </SPAN></FONT></P></TD></TR> 
<TR> 

styl e=" PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING- RIGHT: 0.75pt; 
padding-top: 0.75pt" 

vAlign=top> „ . 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN 

styl e=" FONT-SIZE : 12pt ">d . </span></font></p></td> 

styl e=" PADDING- bottom: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT: 0.75pt; 

padding-top: 0.75pt"> . 

<P class=MsoNormal><FONT face="Times New Roman size=3><SPAN 

styl e=" font-size: 12pt">forge headers or otherwise manipulate identifiers in 

order to disguise the origin of any Content transmitted through the 

servi ce ; </SPAN></FONT></P></TD></TR> 

<TR> 

styl.e="RADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT: 0.75pt; 

PADDING-T0T>: 0.75pt" 

vAlign=top> 

<P class=MsoNormal><FONT face="Times New Roman size=3><SPAN 

styl e-" FONT-SIZE : 12pt">e . </SPAN></FONT></P></TD> 

Styl e=" PADDING- BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT: 0.75pt; 
PADDING-TOP: 0.75pt"> 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN 

styl e=" FONT- SIZE: 12pt">upload, post, email or otherwise transmit any content 

that you do not have a right to transmit under any law or under contractual or 

fiduciary relationships (such as inside information, proprietary and 

confidential information learned or disclosed as part of employment 

relationships or under nondisclosure agreements) ;</SPAN></FONT></P></TD></TR> 

<TR> 

Style="PADDING-BOTTOM: 0-75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT: 0.75pt; 

PADDING-TOP: 0.75pt" 

vAlign=top> 

<p cTass=MsoNormal><FONT face="Times New Roman size=3><SPAN 
Style-" FONT- SIZE: I2pt">f .</span></font></p></td> 

styl e=" PADDING-BOTTOM: 0.75pt; padding-left: 0.75pt; padding-right: 0.75pt; 

PADDING-TOP: 0.75pt"> . 

<P class=MsoNormal><FONT face="Times New Roman si2e=3><SPAN 

styl e=" FONT-SIZE: 12pt">upload, post, email or otherwise transmit any Content 

that infringes any patent, trademark, trade secret, copyright or other 

proprietary rights ("Rights") of any party ;</SPAN></font></p></td></tr> 

<TR> 

styl e=" PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING- RIGHT: 0.75pt; 

PADDING-TOP: 0.75pt" 

vAlign=top> 
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<P class=MsoNormal><FONT face="Times New Roman" size=3><SPAN 
styl e=" FONT-SIZE : 12pt ">g . </span></font></p></td> 

styl e=" PADDING- BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT: 0.75pt; 
padding-top: 0.75pt"> 

<P class=MsoNormal><FONT face="Times New Roman" size=3><SPAN 
styl e=" FONT-SIZE: 12pt">upload, post, email or otherwise transmit any 
unsolicited or unauthorized advertising, promotional materials, "junk mail, 
"spam," "chain letters," "pyramid schemes," or any other form of solicitation, 
except in those areas (such as shopping rooms) that are designated for such 
purpose ; </span></font></p></td></tr> 

<TR> 

<TD ^ 

styl e=" padding- bottom: 0.75pt; padding-left: 0,75pt; padding- right: 0.75pt; 

PADDING-TOP: 0,75pt" 

vAlign=top> „ . 

<P class=MsoNormal><FONT face="Times New Roman size=3><SPAN 

styl e=" FONT-SIZE : 12pt ">h . </span></font></p></td> 

styl e=:" PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT: 0.75pt; 
PADDING-TOP: 0.75pt"> , 

<P class^MsoNormalxFONT face="Times New Roman size=3><SPAN ^ . 
styl e=" FONT-SIZE: 12pt">upload, post, email or otherwise transmit any maternal 
that contains software viruses or any other computer code, files or programs 
designed to interrupt, destroy or limit the functionality of any computer 
software or hardware or telecommunications 
equi pment ; </SPAN></FONT></P></TD></TR> 
<TR> 

Styl e=" PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT : 0.75pt; 

PADDINQ.-TOP : 0.75pt" 

vAliqn=tqp> 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN 
styl e=" FONT-SIZE: 12pt">i .</SPAN></FONT></P></TD> 

styl e=" PADDING- BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING- RIGHT: 0.75pt; 

PADDING-TOP: 0.75pt"> „ . 

<P class=MsoNormal><FONT face="Times New Roman size=3><SPAN 

styl e=" FONT-SIZE: 12pt">disrupt the normal flow of dialogue, cause a screen to 

"scroll" faster than other users of the Service are able to type, or otherwise 

act in a manner that negatively affects other users* ability to engage in real 

ti me exchanges ; </span></font></p></td></tr> 

<TR> 

Styl e=" PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT: 0.75pt; 
PADDING -top: 0.75pt" 

vAlign=top> „ . 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN 

styl e=" FONT-SIZE: 12pt">j .</SPAN></FONT></P></TD> 

styl e=" PADDING -BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; padding-right: 0.75pt; 

PADDING-TOP: 0.75pt"> ,^ . 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN 

styl e=" FONT-SIZE: 12pt">interfere with or disrupt the Service or servers or 

networks connected to the Service, or disobey any requirements, procedures, 

policies or regulations of networks connected to the 

Servi ce ; </SPAN></FONT></P></TD></TR> 

<TR> 

styl e=" PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING- RIGHT: 0.75pt; 
padding-top: 0.75pt" 

vAlign=top> „ , 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN 
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Style=" font-size: 12pt">k.</SPAN></F0NT></P></TD> 

style="PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING- right: 0.75pt; 
padding-top: 0-75pt"> 

<p class=:MsoNorma1><FONT face="Times New Roman" size=3><SPAN 
style=" FONT-SIZE: 12pt">intentionally or unintentionally violate any applicable 
local, state, national or international law, including, but not limited to, 
regulations promulgated by the U.S. securities and Exchange Commission, any 
rules of any national or other securities exchange, including, without 
limitation, the New York Stock Exchange, the American Stock Exchange or the 
NASDAQ, and any regulations having the force of law;</SPAN></FONT></P></TD></TR> 

<TR> 

<TD ^ 
style=" PADDING- bottom: 0.75pt; padding-left: 0.75pt; padding-right: 0.75pt; 

PADDING-TOP : 0.75pt" 
vAlign=top> 

<P class=MsoNormal><FONT face="Times New Roman size=3><SPAN 
Style=" FONT-SIZE: 12pt">l .</SPAN></FONT></P></TD> 

style=" PADDING-BOTTOM: 0.75pt; padding-left: 0.75pt; padding- right: 0.75pt; 

PADDING-TOP: 0.75pt"> ^, . 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN 
style=" FONT-SIZE: 12pt">"stalk" or otherwise harass another; 

O r </ S PANx/ FONTx/ P> </TD> </TR> 
<TR> 

style=" PADDING- BOTTOM: 0.75pt; padding-left; 0.75pt; PADDING-RIGHT: 0,75pt; 

PADDING-TOP: 0.75pt" 

vAlign=top> 

<p cTass=MsoNormal><FONT face="Times New Roman size=3><SPAN 
styles" FPNT-SIZE: 12pt">m.</SPAN></F0NT></P></TD> 

Style="P'XbDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING- RIGHT: 0.75pt; 
PADDING-TOP: 0,75pt"> „ . 

<P class=MsoNormal><FONT face="Times New Roman size=3><SPAN 
style=" FONT-SIZE: 12pt">collect or store personal data about other 
users . </SPAN></FONT></P></TD></TR></TBODY></TABLE> 
<p><FONT face="Times New Roman" size=3><SPAN 
styl e=" FONT-SIZE : 12pt ">&nbsp ; <o : px/0 : Px/S PANx/ FONTx/ P> 
<p><FONT face="Time5 New Roman" 5ize=3xSPAN styl e=" FONT-SIZE: 12pt >You 
acknowledge that ElectionMall.com does not pre-screen content, but that ^ 
ElectionMall.com and its designees shall have the right (but not the obligation) 
in their sole discretion to refuse or move any Content that is available via the 
service, without limiting the foregoing, ElectionMall.com and its designees 
shall have the right to remove any Content that violates the TOS or is otherwise 
objectionable. You agree that you must evaluate, and bear all risks associated 
with, the use of any Content, including any reliance on the accuracy, 
completeness, or usefulness of such Content. In this regard, you acknowledge 
that you may not rely on any Content created by ElectionMall.com or submitted to 
El ectionMall .com. </SPANx/ FONTx/ P> -.^ 
<PxFONT face="Times New Roman" size=3xSPAN style="FONT-SIZE: 12pt >You 
acknowledge and agree that ElectionMall.com may preserve Content and may also 
disclose content if required to do so by law or in the good faith belief that 
such preservation or disclosure is reasonably necessary to: (a) comply with 
legal process; (b) enforce the TOS; (c) respond to claims that any Content 
violates the rights of third-parties; or (d) protect the rights, property, or 
personal safety of ElectionMall.com, its users and the public. 
</SPAN></FONTx/P> ^ „ n ^.1 w 

<PxFONT face="Times New Roman" size-3xSPAN style= FONT-SIZE: 12pt >You 
understand that the technical processing and transmission of the service, 
including your Content, may involve (a) transmissions over various networks; and 
(b) changes to conform and adapt to technical requirements of connecting 
networks or devices. </SPANx/FONTx/P> 
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<p><FONT face="Times New Roman" size=3><SPAN style="FONT-SlZE: 12pt">7. SPECIAL 

ADMONITIONS FOR INTERNATIONAL USE </SPAN></FONT></P> . . 

<P><FONT face="Tinies New Roman" size=3><SPAN style=" FONT-SIZE: 12pt">Recogmzing 
the global nature of the internet, you agree to comply with all local rules 
regarding online conduct and acceptable Content, specifically, you agree to 
comply with all applicable laws regarding the transmission of technical data 
exported from the united States or the country in which you reside. 
</SPAN></FONT></P> , , ^ „ „ ^r- 

<P><FONT face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >8. PUBLIC 

CONTENT POSTED TO ELECTIONMALL.COM</SPAN></FONT></P> 

<P><FONT face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >(a) For 
purposes of the TOS, "publicly accessible areas of the service" are those 
accessible by the general public. By way of example, a publicly accessible area 
of the service would include public ElectionMall .com. .</SPAN></F0NT></P> 
<p><FONT face="Times New Roman" size=3><SPAN style="FONT-SiZE: 12pt >(b) with 
respect to Content you elect to post for inclusion in publicly accessible areas 
of ElectionMall.com or that consists of photos or other graphics you elect to 
post to any other publicly accessible area of the Service, you grant 
ElectionMall.com the world-wide, royalty free and non-exclusive license to 
reproduce, modify, adapt and publish such content on the seryice solely for the 
purpose of displaying, distributing and promoting the specific ElectioriMall.com 
to which such Content was submitted, or, in the case of photos 9r graphics, 
solely for the purpose for which such photo or graphic was submitted to the 
service. This license exists only for as long as you elect to continue to 
include such content on the service and shall be terminated at the time you 
delete such Content from the Service. </SPAN></FONT></p> ., , ^ ,,.^u 

<p><FONT face="Times New Roman" size=3><SPAN styl e=" FONT-SIZE :12pt >(c) With 
respect to all other Content you elect to post to other publicly accessible 
areas of the Service, you grant ElectionMall.com the royalty-free, perpetual, 
irrevocable, non-exclusive and fully sublicensable right and license to use, 
reproduce, modify, adapt, publish, translate, create derivative works from, 
distribute', perform and display such Content (in whole or part) worldwide and/or 
to incorporate it in other works in any form, media, or technology now known or 
later developed. </span></font></p> n 
<P><FONT face="Tiffles New Roman" size=3><SPAN style= FONT-SiZE: 12pt >9. 

INDEMNITY </SPAN></FONT></P> , „ „ ^, 

<p><FONT face="Times New Roman" size=3><SPAN styl e=" FONT-SIZE : 12pt >You agree 
to indemnify and hold ElectionMall .com, and its subsidiaries, affiliates, 
officers, agents, co-branders or other partners, and employees, harmless from 
any claim or demand, including reasonable attorneys' fees, made by any third 
party due to or arising out of Content you submit, post to or transmit through 
the service, your use of the service, your connection to the Service, your 
violation of the TOS, or your violation of any rights of 
another. </SPAN></FONT></P> ^ „ ^^^^ _ 

<P><F0NT face="Times New Roman" size=3><SPAN style= FONT-SIZE: 12pt >10. NO 
RESALE OF SERVICE </SPAN></FONT></P> , ^ 

<p><FONT face="Times New Roman" size=3><SPAN style=" FONT -SIZE: 12pt >You agree 
not to reproduce, duplicate, copy, sell, resell or exploit for any commercial 
purposes, any portion of the service, use of the Service, or access to the 
service. </SPAN></font></P> , ,. ,^ ,. ^r..,r.o,. 

<p><FONT face="Times New Roman" size=3><SPAN styl e=" font-size: 12pt >11. general 

PRACTICES regarding USE AND STORAGE </SPAN></F0NT></P> 

<p><F0NT face="Times New Roman" size=3><SPAN styl e=" FONT-SIZE: 12pt >You 
acknowledge that ElectionMall.com may establish general practices and limits 
concerning use of the Service, including without limitation the maximum number 
of days that email messages, message board postings or other uploaded Content 
will be retained by the service, the maximum number of email messages that may 
be sent from or received by an account on the Service, the maximum size of any 
email message that may be sent from or received by an account on the service, 
the maximum disk space that will be allotted on ElectionMall .com s servers on 
your behalf, and the maximum number of times (and the maximum duration tor 
which) you may access the service in a given period of time, you agree that 
ElectionMall.com has no responsibility or liability for the deletion or failure 
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to store any messages and other communications or other Content maintained or 
transmitted by the service. You acknowledge that ElectionMall.com reserves the 
right to log off accounts that are inactive for an extended period of time. You 
further acknowledge that ElectionMall.com reserves the right to change these 
general practices and limits at any time, in its sole discretion, with or 
without notice. </SPAN></FONT></P> n 
<P><FONT face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >12. 
MODIFICATIONS TO SERVICE </SPAN></FONT></P> 

<P><FONT face="Times New Roman" size=3><SPAN ■ j x 

style=" FONT-SIZE: 12pt">ElectionMall .com reserves the right at any time and from 
time to time to modify or discontinue, temporarily or permanently, , the service 
(or any part thereof) with or without notice. You agree that ElectionMaM.com 
shall not be liable to you or to any third party for any modification, 
suspension or discontinuance of the Service. </SPAN></FONT></P> 
<p><FONT face="Times New Roman" size=3><SPAN style= FONT-SIZE: 12pt >13. 

TERMINATION </SPAN></FONT></P> , „ 

<p><FONT face="Times New Roman" size=3><SPAN style="FONT-SiZE: 12pt >You agree 
that ElectionMall.com, in its sole discretion, may terminate your password, 
account (or any part thereof) or use of the service, and remove and discard any 
content within the Service, for any reason, including, with9Ut limitation, tor 
lack of use or if ElectionMall.com believes that you have violated or acted 
inconsistently with the letter or spirit of the TOS. ElectionMall .com may also 
in its sole discretion and at any time discontinue providing the Service, or any 
part thereof, with or without notice. You agree that any termination of your 
access to the Service under any provision of this TOS may be effected without 
prior notice, and acknowledge and agree that ElectionMall.com may immediately 
deactivate or delete your account and all related information and files in your 
account and/or bar any further access to such files or the service. Further, you 
agree that ElectionMall.com shall not be liable to you or any third-party for 
any termination of your access to the service. </span></font></p> 
<P><FOyT face="Times New Roman" size=3><SPAN style= FONT-SIZE: 12pt >14. 
- DEALINGS WITH ADVERTISERS </SPAN></F0NT></P> i-,^.. ^ ^ 

<p><FONr face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >Your 
correspondence or business dealings with, or participation in promotions of, 
advertisers found on or through the Service, including payment and delivery ot 
related goods or services, and any other terms, conditions, warranties or 
representations associated with such dealings, are solely between you and such 
advertiser, you agree that ElectionMall.com shall not be responsible or liable 
for any loss or damage of any sort incurred as the result of any such dealings 
or as the result of the presence of such advertisers on the Service. 

</SPAN></FONT></P> , „ ic ■ XM./C 

<p><FONT face="Times New Roman" size=3><SPAN style=" FONT- SIZE: 12pt >15. links 

<p><FONT^face="Times New Roman" size=3><SPAN styl e=" FONT-SIZE :12pt">The service 
may provide, or third parties may provide, links to other world wide web sites 
or resources. Because ElectionMall .com has no control over such sites and 
resources, you acknowledge and agree that ElectionMall.com is not responsible 
for the availability of such external sites or resources, and does not endorse 
and is not responsible or liable for any content, advertising, products, or 
other materials on or available from such sites or resources. You further 
acknowledge and agree that ElectionMall.com shall not be responsible or nable, 
directly or indirectly, for any damage or loss caused or alleged to be caused by 
or in connection with use of or reliance on any such Content, goods or services 
available on or through any such site or resource. </SPAN></FONT></P> 
<p><FONT face="Times New Roman" size=3><SPAN style=" FONT- SIZE: 12pt >16. 

ELECTIONMALL. COM 'S PROPRIETARY RIGHTS </SPAN></FONT></P> „ 

<P><FONT face="Times New Roman" size=3><SPAN style=" FONT- SIZE: 12pt >You 
acknowledge and agree that the Service and any necessary software used in 
connection with the Service ("Software") contain proprietary and confidential 
information that is protected by applicable intellectual property and other 
laws. YOU further acknowledge and agree that Content contained in sponsor 
advertisements or information presented to you through the Service or 
advertisers is protected by copyrights, trademarks, service marks, patents or 
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other proprietary rights and laws. Except as expressly authorized by 
ElectionMall.com or advertisers, you agree not to modify, rent, lease, loan, 
sell, distribute or create derivative works based on the Service or the 
Software, in whole or in part. </SPAN></FONT></P> 
<p><FONT face="Times New Roman" size=3><SPAN 

style=" FONT-SIZE: 12pt">ElectionMall .com grants you a personal, non-transferable 
and non-exclusive right and license to use the object code of its Software on a 
single computer; provided that you do not (and do not allow any third party to) 
copy, modify, create a derivative work of, reverse engineer, reverse assemble or 
otherwise attempt to discover any source code, sell, assign, sublicense, grant a 
security interest in or otherwise transfer any right in the software. You agree 
not to modify the Software in any manner or form, or to use modified versions of 
the Software, including (without limitation) for the purpose of obtaining 
unauthorized access to the Service. You agree not to access the Service by any 
means other than through the interface that is provided by ElectionMall.com for 
use in accessing the Service. </SPAN></FONT></P> 

<P><FONT face="Times New Roman" size=3><SPAN style=" font-size : 12pt">17. 

DISCLAIMER OF WARRANTIES </SPAN></FONT></P> 

<p><FONT face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt">Y0U 

EXPRESSLY UNDERSTAND AND AGREE THAT: </SPAN></FONT></P> 

<TABLE border=0 cell Padding=0 style="mso-cen spacing: 1.5pt"> 

<TBODY> 

<TR> 

style=" PADDING- BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT: 0.75pt; 

PADDING-TOP: 0.75pt" 

vAlign=top> 

<P class^MsoNormalxFONT face="Times New Roman" size=3><SPAN 
Styl e=" FONT-SIZE : 12pt">a . </SPAN></FONT></P></TD> 

<™ ^ 

styl e=" PADDING-BOTTOM: 0,75pt; PADDING-LEFT: 0.75pt; PADDING- RIGHT: 0.75pt; 
-PADDTNG-TOP: 0.75pt"> 

<P class«MsoNormal><FONT face="Times New Roman" size=3><SPAN 

style-" FONT-SIZE: 12pt">Y0UR USE OF THE SERVICE IS AT YOUR SOLE RISK. THE 
SERVICE IS PROVIDED ON AN "AS IS" AND "AS AVAILABLE" BASIS. ELECTI0NMALL.COM 
EXPRESSLY DISCLAIMS ALL WARRANTIES OF ANY KIND, WHETHER EXPRESS OR IMPLIED, 
INCLUDING, BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS 
FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. </SPAN></F0NT></P></TD></TR> 
<TR> 

Styl e=" PADDING- BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT: 0.75pt; 

PADDING-TOP: 0.75pt" 

vAliqn-top> 

<P cTass=MsoNormal><FONT face="Times New Roman" size-3><SPAN 
styl e=" FONT-SIZE : 12pt ">b . </span></font></p></td> 

Styl e=" PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING- RIGHT: 0.75pt; 
PADDING-TOP: 0.75pt"> 

<p class=MsoNormal><FONT face="Times New Roman" size=3><SPAN 

styl e=" font-size: 12pt">ELECTI0NMALL.C0M MAKES NO WARRANTY THAT (i) THE SERVICE 
WILL MEET YOUR REQUIREMENTS, (ii) THE SERVICE WILL BE UNINTERRUPTED, TIMELY, 
SECURE, OR ERROR- FREE, (iii) THE RESULTS THAT MAY BE OBTAINED FROM THE USE OF 
THE SERVICE WILL BE ACCURATE OR RELIABLE, (iv) THE QUALITY OF ANY PRODUCTS, 
SERVICES, INFORMATION, OR OTHER MATERIAL PURCHASED OR OBTAINED BY YOU THROUGH 
THE SERVICE WILL MEET YOUR EXPECTATIONS, AND (V) ANY ERRORS IN THE SOFTWARE WILL 
BE CORRECTED . </SPAN></F0NT></P></TD></TR> 
<TR> 

<TD ^ 

Styl e=" PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING- RIGHT: 0.75pt; 

PADDING-TOP: 0.75pt" 
vAliqn=top> 

<p class=MsoNormal><FONT face="Times New Roman" size=3><SPAN 
styl e=" FONT-SIZE : 12pt ">c . </span></font></p></td> 
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style=" PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING- right: 0.75pt; 

PADDING-TOP: 0.75pt"> „ . ^ 

<p class=MsoNormal><FONT f ace="Ti mes New Roman size=3><SPAN 

Stvle=" FONT-SIZE: 12pt">ANY MATERIAL DOWNLOADED OR OTHERWISE OBTAINED THROUGH 
THE USE OF THE SERVICE IS DONE AT YOUR OWN DISCRETION AND RISK AND THAT YOU WILL 
BE SOLELY RESPONSIBLE FOR ANY DAMAGE TO YOUR COMPUTER SYSTEM OR LOSS OF DATA 
THAT RESULTS FROM THE DOWNLOAD OF ANY SUCH MATERIAL . </SPAN></FONT></P></TD></TR> 
<TR> 

style="PADDiNG-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING- right: 0.75pt; 

PADDING-TOP: 0.75pt" 

vAlign=top> „ . 

<p class=MsoNormal><FONT face="Times New Roman size=3><SPAN 

Styl e=" FONT-SIZE : 12pt' 'xJ . </SPAN></F0NT></P></TD> 

Style="PADDING-BOTTOM: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-RIGHT : 0.75pt; 

PADDING-TOP : 0.75pt"> .. • , 

<P c1ass=MsoNorma1><F0NT face= Times New Roman size=3><SPAN 

styl e=" FONT-SIZE: 12pt">N0 ADVICE OR INFORMATION, WHETHER ORAL OR WRITTEN, - 

OBTAINED BY YOU FROM ELECTI0NMALL.COM OR THROUGH OR FROM THE SERVICE SHALL 

CREATE ANY WARRANTY NOT EXPRESSLY STATED IN THE 

TOS . </SPAN></FONT></P></TD></TR></TBODY></TABLE> 

<p><FONT face="Times New Roman" size=3><SPAN 

styl e=" FONT-SIZE: 12pt"> <o:p></0:P></SPAN></FONT></P> , 

<P><FONT face="Times New Roman" size=3><SPAN style= FONT-SIZE: 12pt >18. 
LIMITATION OF LIABILITY </SPAN></FONT></P> , 

<p><FONT face="Times New Roman" size=3><SPAN style= FONT-SIZE: 12pt >YOU 

EXPRESSLY UNDERSTAND AND AGREE THAT ELECTI0NMALL.COM SHALL NOT BE LIABLE FOR ANY 
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, CONSEQUENTIAL OR EXEMPLARY DAMAGES, 
INCLUDING BUT NOT LIMITED TO, DAMAGES FOR LOSS OF PROFITS, GOODWILL, USE, DATA 
OR OTHER INTANGIBLE LOSSES (EVEN IF ELECTI0NMALL.COM HAS BEEN ADVISED OF THE 
POSSIBILITY OF SUCH DAMAGES), RESULTING FROM: (i) THE USE OR THE INABILITY TO 
USE THE SERVICE: (ii) THE COST OF PROCUREMENT OF SUBSTITUTE GOODS AND SERVICES 
RESULTING FROM ANY GOODS, DATA, INFORMATION OR SERVICES PURCHASED OR OBTAINED OR 
MESSAGES RECEIVED OR TRANSACTIONS ENTERED INTO THROUGH OR FROM THE SERVICE; 
flii) UNAUTHORIZED ACCESS TO OR ALTERATION OF YOUR TRANSMISSIONS OR DATA; Ov) 
STATEMENTS OR CONDUCT OF ANY THIRD PARTY ON THE SERVICE; OR (v) ANY OTHER MATTER 
RELATING TO THE SERVICE. </SPAN></FONT></P> 

<p><FONT face="Times New Roman" size=3><SPAN style= font-size : 12pt >19. 

EXCLUSIONS AND LIMITATIONS </SPAN></FONT></P> 

<p><FONT face="Times New Roman" size=3><SPAN styl e=' font-size: 12pt >spME 

JURISDICTIONS DO NOT ALLOW THE EXCLUSION OF CERTAIN WARRANTIES OR THE LIMITATION 
OR EXCLUSION OF LIABILITY FOR INCIDENTAL OR CONSEQUENTIAL DAMAGES. ACCORDINGLY, 
SOME OF THE ABOVE LIMITATIONS OF SECTIONS 17 AND 18 MAY NOT APPLY TO YOU. 

<S<FONT''facI="Times New Roman" size=3><SPAN styl e=" FONT-SIZE: 12pt">20. SPECIAL 

ADMONITION FOR SERVICES RELATING TO FINANCIAL MATTERS </SPAN></FONT></P> 

<p><FONT face="Times New Roman" size=3><SPAN styl e=" FONT-SIZE: 12pt >lf you 
intend to create or join any service, receive or request any news, messages, 
alerts or other information from the service concerning companies, stock quotes, 
investments or securities, please read the above Sections 17 and 18 again. They 
go doubly for you. In addition, for this type of information particularly, the 
phrase "Let the investor beware" is apt. The Service is providedfor. . ^ . , 
informational purposes only, and no Content included in the service is intended 
for trading or investing purposes. ElectionMall.com shall not be responsible or 
liable for the accuracy, usefulness or availability of any information 
transmitted via the service, and shall not be responsible or liable for any 
trading or investment decisions made based on such information. 

</SPAN></FONT></P> ^ „ ^„ M^-r-rr-r- 

<P><FONT face="Times New Roman" size=3><SPAN styl e= 'FONT- SIZE: 12pt >21. NOTICE 

^p><FONT^face="Times New Roman" size=3><SPAN styl e=" FONT-SIZE: 12pt">Notices to 
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you may be made via either email or regular mail. The Service may also provide 
notices of changes to the TOS or other matters by displaying notices or links to 
notices to you generally on the Service. </span></font></p> ^ 
<p><FONT face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >22. 
TRADEMARK INFORMATION </SPAN></FONT></P> 
<p><FONT face="Times New Roman" size=3><SPAN 

style=" FONT-SIZE: 12pt">ElectionMan . com the ElectionMall.com logo, 
EyardSigns.com trademarks and service marks, and other ElectionMall.com logos 
and product and service names are trademarks of ElectionMall .com Inc. (the 
"ElectionMall.com Marks"), without ElectionMall .com' s prior permission, you 
agree not to display or use in any manner, the ElectionMall.com 
Marks. </SPAN></FONT></P> ^ „ " 

<P><FONT face="Times New Roman" size=3><SPAN style= FONT-SIZE: 12pt >23. 

COPYRIGHTS and COPYRIGHT AGENTS </SPAN></FONT></P> 

<p><FONT face="Times New Roman" size=3><SPAN . -> x 

style=" FONT-SIZE: 12pt">ElectionMall .com respects the intellectual property of 
others, and we ask our users to do the same, if you believe that your work has 
been copied in a way that constitutes copyright infringement, please provide 
ElectionMall .corn's Copyright Agent the following information: </span></FONT></p> 
<0L type=l> 

<LI class=MsoNormal . ^ ^ n- ^ ta t m 

style="mso-margin-top-alt : auto; mso-margin-bottom-alt : auto; mso-iist: lU ieveii 
Ifol; tab-stops: list 36.0pt"><FONT „ n ^ ■ 

face-"Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt>an electronic or 
physical signature of the person authorized to act on behalf of the owner of the 
copyri ght i nterest ; </SPAN></FONT> 

<LI class=MsoNormal . , ^ t • ^ ta t^w^h 

style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto; mso-hst: 10 I even 
Ifol; tab-stops: list 36.0pt"><FONT .« ^ ■ ^- ^-^^ 

face="Times New Roman" size-3><SPAN style=" font-size: 12pt'>a description of the 
copyrighted work that you claim has been infringed; </SPAN></font> 
<LI- class5=MsoNormal . ^ n - ^ tat n 

style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto; mso-list: 10 I even 
Ifol; tab-stops: list 36.0pt"><FONT „ . . ^- -f 

face="Times New Roman" size=3><SPAN style="FONT-SlZE: 12pt">a description of 
where the material that you claim is infringing is located on the 

si te ; </SPAN></FONT> 

<LI class=MsoNormal . , ^ ^ n - ^ in i^w«ii 

style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto; mso-list: 10 leveii 
Ifol; tab-stops: list 36.0pt"><FONT 

face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >your address, 
telephone number, and email address; </SPAN></font> 

<LI class=MsoNormal . , ^ ^ i - ^ in 

style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto; mso-list: 10 I even 
Ifol; tab-stops: list 36.0pt"><FONT 

face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >a statement by you 
that you have a good faith belief that the disputed use is not authorized by the 
copyright owner, its agent, or the law;</SPAN></FONT> 

<LI class=MsoNormal . , ^ ^ t ^ m 

style=:"mso-margin-top-alt: auto; mso-margin-bottom-alt: auto; mso-list: 10 levell 
Ifol; tab-stops: list 36.0pt"><FONT , 

face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt>a statement by you, 
made under penalty of perjury, that the above information in your Notice is 
accurate and that you are the copyright owner or authorized to act on the 
copyright owner's behalf. </span></font></li></ol> 

<p class=MsoNormal><FONT face="Times New Roman" size=3><SPAN . 
style=" FONT-SIZE: 12pt"><BR><BR>ElectionMall .corn's Copyright Agent for Notice of 
claims of copyright infringement on its site is Simer Singh who can be reached 
as follows: <BR>By email: <A 
h ref ="mai 1 to : copyri ght@El ecti onMal 1 . com" 

>copyright@ElectionMall .com</A></SPAN></FONT></P> , 

<p><FONT face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >24. GENERAL 

INFORMATION </SPAN></FONT></P> 
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<P><FONT face-"Times New Roman" size-3><SPAN style="F9NT-SlZE: 12pt">The TOS 
constitute the entire agreement between you and ElectionMall . com and govern your 
use of the Service, superceding any prior agreements between you and 
ElectionMall .com. You also may be subject to additional terms and conditions 
that may apply when you use affiliate services, third-party content or 
third-party software. The TOS and the relationship between you and ^ 
ElectionMall.com shall be governed by the laws of the State of Delaware without 
regard to its conflict of law provisions. The failure of ElectionMall.com to 
exercise or enforce any right or provision of the TOS shall not constitute a 
waiver of such right or provision, if any provision of the TOS is found by a 
court of competent jurisdiction to be invalid, the parties nevertheless agree 
that the court should endeavor to give effect to the parties' intentions as 
reflected in the provision, and the other provisions of the TOS remain in full 
force and effect, you agree that regardless of any statute or law to the 
contrary, any claim or cause of action arising out of or related to use of the 
service or the TOS must be filed within one (1) year after such claim or cause 
of action arose or be forever barred. </SPAN></FONT></P> 

<p><FONT face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >The section 
titles in the TOS are for convenience only and have no legal or contractual 
effect. <BR><BR>25. violations</span></font></p> „ n 

<P><F0NT face="Times New Roman" size=3><SPAN style=" font-size : 12pt >Please 
report any violations of the TOS to our Customer care group. 

</SPAN></FONT></P></TD></TR></TBODY></TABLE> 
</body></html> 
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Language=VBScript %> 
<html> 
<head> 

<ti tl e> evardsi qn Resul ts</ti tl e> 

<!-- #include file="inc/sGSsion_timeout.inc --> 

<!-- #include file="inc/top_inc.inc" --> 

<!-- #include file="inc/database.inc" --> 

<td valign="top" align=:"center"> -, 

<font face=" Verdana, Arial" size="4"><b>eYardSign Resul ts</font><BR><BR> 

<table ce11padding="0" cellspacing="r border-"0" width="98%" align= center > 

<td align="center" valign="bottom" width="15%"><font face="verdana, Arial" 
size="2"><b>MaiTing Date-Tinie</b></font></td> „ . ■ t,. 

<td aliqn= center" valign=" bottom" width="15%"><font face="Verdana, Anal 
size="2"><b>TitTe</b></font></td> „ ^ • t. 

<td align="center" width="14%" valign="top"><font face= Verdana, Anal 
si ze~"" 1"> 

<a href=" j avascri pt : portwi n ( ' button . asp?i d=l&amp ; i mg=hdq . gi f , 300 , 180) "> 
<img src='^^grfx/hdq.gif" a1t="Headquarters" border="0" WIDTH="42 
HEIGHT="42"></a><br>Headquarters</font></td> 

<td align="center" width="14%" valign="top"><font face= Verdana, Anal 

si ze~" 1"> 

<a href =" i avascri pt : portwi n C ' button . asp?i d=2&amp ; i mg=donate . gi f , 300 , 230) " 
<img src='^^grfx/donate.gif" alt="Donate" border="0" WIDTH="42" 
HElGHT="42"></a><br>Donate</font></td> , „ r ^ .. ^ » • t. 

<td a1ign="center" width="14%" valign="top"><font face= Verdana, Arial 

size="r> 

h ref =" i avascri pt : portwi n ( ' button . asp?i d=3&amp ; i mg=vol untee r . gi f ' , 300 , 300) "> 
<img src=^grfx/vo1 unteer.gif" alt="volunteer" border="0" WIDTH="42" 
HElGHT="42"><br></a>vo1unteer</font></td> ., „ ^ . . ^^.-.t. 

' ■ ■' <tti align="center" width="14%" valign="top"><font face= Verdana, Anal 
size="l"r 

href =" i avascri pt : portwi n( ' button . asp?i d=4&amp ; img=sendtoaf ri end . gi f , 300 , 310) "> 
<img src="qrfx/sendtoaf riend.gif" alt="send to a Fnend border= 0 

WIDTH="42" HElGHT=''42"></a><br>send to Friend</font></td> 

<td align="center" width="14%" valign="top"><font face= Verdana, Anal 

si ze"" 1"> 

<a h ref ="i avascri pt: portwi nC button. asp?id=5&img=vote.gif' ,300, 200) "> 
<img src=^^grfx/vote.gif" alt-"vote" border="0" width="42" 

HEIGHT="42"></a><br>Vote</font></td> 

</tr> 

<% const iRows = 15 : Dim line 

set rs = server. CreateObjectC"ADODB. Recordset ) 

suser_id = sessionC'user") 

sSQL = "SELECT track_id, ^ , ^ r: - . 

mai l_date ,Ti tl e , Number_Headquarters , Number^vol unteer , Number.Sendtof n end , + „ 

"Number_Vote FROM Mail_Tracking WHERE user.id = + suser„id + order by 
mail_date DESC" 

rs.Open sSQL,db 



if rs.EOF then . , , ^ . ,^ ^ . ^ ^ 

Response. write "<tr><td colspan=*7' bgcolor= C0D5FC xfont 
face=' Verdana, AriaV size='l*>No items in List</font></TD></TR>" 



el se 

do until rs.EOF 

sTrack_id = cstr(rsCO)) 
*Get Headquarters 
sHdq = cstr(rsC3)) 
'Get number of Volunteers 
if rs (4) > 0 then 
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sVolunteerNo = "<a href =' vol unteer_list.asp?id= + 
sTrack_id + "'>" + cstr(rs(4)) + "</a>" 

else 

SVolunteerNo = cstr(rs(4)) 

end if 

'Get number of Send to freind 
if rs(5) > 0 then 

ssendtof reindNo = "<a 
href=*sendtofriend_list.asp?id=" + sTrack_id + + cstr(rsC5)) + "</a>" 

else 

ssendtof reindNo = cstr(rs(5)) 

end if 

'Get number of Voters 

if rs(6) > 0 then , , . , 

sVoterNo = "<a href='vote_list,asp?id=" + sTrack_id 

+ "'>" + cstr(rs(6)) + "</a>" 

else 

sVoterNo = cstr(rs(6)) 

end if 



'check if table needs to changed 

'if iinc = iRows then call insertTableO 



Response. Write "<TR>" 

Response-Write "<TD a1ign=*center ' bgcolor=:'cOD5FC xfont 

face=Werdana, Arial' size='l'>" + _ , . . . 

cstr(formatdatetime(rs(l),2)) + + 
cstr(formatdatetimeCrsCl),4)) + "</font></TD>" , . . . ^ r , ^ 

Response. write "<TD align=neft' bgcolor='C0D5FC' xfont 

-face= 'Verdana, Arial' size='l'>" +_ , . , . „ 

"<a href=javascript:portwin('preview__yardsign.asp?id= + 

cstr(cint(sTrack_id)*2137) + "&track=l' ,600,650)>" + rs(2) + "</font></a></TD>" 

Response.wri te "<TD aligns 'center' bgcolor= C0D5FC xfont 

face=' Verdana, Arial' size='2'>" + sHdq + "</font></TD>" , ^ . , ^ 

Response.wri te "<TD align=' center' bgcolor= C0D5FC xfont 

face=' Verdana, Arial' size='2'>0</fontx/TD>" , ^ ^ .^n^^r^^. ^ ^ 

Response. write "<TD aligns' center ' bgcolor='C0D5FC xfont 
face=' Verdana, Arial' size='2'>" + sVolunteerNo + "</fontx/TD>" , ^ , , ^ 

Response. write "<td align= 'center' bgcolor='cOD5FC xfont 
face=' Verdana, Arial' size='2'>" + ssendtof reindNo + "</fontx/TD>" ^ ^ , ^ 

Response. write "<TD align= 'center' bgcolor='C0D5FC xfont 
face=' Verdana, Arial' size='2'>" + svoterNo + "</fontx/TDx/TR>'^ 

rs.MoveNext 

'iinc = iinc + 1 

loop 

end if%> 
</TABLE></font> 

<formxinput name='buttonl' type= ' button ' 
onclick="javascript:document.location='default.asp'" value= Back x/form> 
<%' Clean Up 

rs, Close : set rs = nothing 
db. Close : set db = nothing%> 
<!-- #include file="inc/bottom_inc-inc" 

<%f unction InsertTableO 

response. write "</table>" ^ , ^ ^ , 

response. write "<table cellpadding=:'0' cellspacing='l' border^ 0 

width='98%' align='center'>" 

end function %> 
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<%@ Language=VBScri pt %> 

<html><head><title>List of Volunteers</title> 
<!-- #include file="inc/session„timeout.inc" — > 
<!-- #include file="inc/top_inc.inc" 
<!-- #include file="inc/database.inc" --> 

<td align="center" valign="top"><%'code start%> 

<font face=' Verdana, AriaV size='3'><B>Volunteer 

Detai 1 s</f ont></B><BR><BR> 

<table width=:"100%" border="0" censpacing="0" 

eel 1 paddi ng="0" al i gn="mi ddl e"> 

<%set rs = server. CreateObjectC'ADODB. Recordset") 
set rsl = server. CreateObjectC'ADODB. Recordset") 

sVolunteer_id = Request .QueryStringC'id") 
sSQL = "Select * FROM volunteer WHERE volunteer_id = " + 

svolunteer_id 

sSQLl = "Select a. question from volunteer_questions 
a, volunteer_Question_Link b WHERE a.question_id = " + _ 

"b.question_id AND b. volunteer_id = " + 



svolunteer_id 



record found. </td></tr>" 



rs.Open sSQL,db 
rsl. Open sSQLl,db 

if rs.EOF then 

Response.wri te "<TR><TD cl as5=' forms '>No 



el se%> 

<tr><td cl ass= ' forms ' ><B>Name</B></td> 
<TD cl ass= ' forms ' ><%Response . Wri te 
rs("First_Name") + " " + rsC"Last_Name")%></td></tr> 

<tr><td class=' forms '><B>Address l</B></td> 

^ - <TD 

class='fcfms'><%=rsC'Addressl")%></td></tr> ^ ^ , 

<tr><td class=' forms '><B>Address 2</B></td> 
<TD 

class='forms'><%=rs("Address2")%></td></tr> ^ , 

<t rxtd cl ass= * forms ' ><B>Ci ty</B></td> 
<TD class=' forms '><%=rs("city")%></td></tr> 
<tr><td class=' forms '><B>Zip Code</B></td> 
<TD 

class=' forms •><%=rs("zipcode")%></td></tr> ^ , 

<t rxtd cl as5= ' forms ' ><B>Phone</B></td> 
<TD class=' forms '><%=rsC"Phone")%></td></tr> 
<t rxtd cl ass= ' forms ' ><B>E-Mai 1 </Bx/td> 
<TD class=' forms 'xa 
href="mailto:<%=rs("email")%>"x%-rs("email")%x/ax/tdx/tr> 

<%if not rsl. EOF then 

response. write "<TR><td colspan='2' 



cl ass= ' forms ' ><BR><BR>" 

"<BR>" 



end if 
end if 

rs. Close : set rs = nothing 
db. close : set db = nothing%> 
</table> 
<form> 

<input type=button value="Back" 
onclick="hi story. backO ; ">      
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do until rsl. EOF 

Response. Write rsl(O) + 

rsl.MoveNext 

loop 

Response. write "</tdx/tr>" 



volunteer_details.asp . 
<input type=button value="Back to evardSign 
Responses" one! ick="hi story. go(-2) ;" name=buttonl> 

</form> 

<%'code end%> . , , ^.n .1. ,.. ^ ■ • 

<!— #inc1ude file= inc/bottom_inc.inc — > 
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<%@ Language=VBScript %> 
<html> 

<head> , . ^ 

<ti tl e>Vol unteer Regi st rati on</ti tl e> 
<scri pt 1 anguage==" JavaScri pt"> 
function checkFormQ { 

var iinc; 

G r ro r* Pi d ci s — • ' 

if (trimCdocument. SIGNUP. first_name. value) == "") { 

errorFields += "- Enter a First Name for this account. \n , 
} 

if (trimCdocument. SIGNUP. last_name. value) == "") { 

errorFields += "- Enter a Last Name for this account. \n , 

} 

if (lisEmailvalidCdocument. SIGNUP. email. value)) { . 

errorFields += "- Enter a valid email address in the form 

xxx@xxx.xxx.\n" ; 

} 

if (trimCdocument. SIGNUP. City. value) ==„"") { 
errorFields += "- Enter City.\n ; 
} 

if CtrimCdocument. SIGNUP. zipcode. value) ==„"") { 
errorFields += "- Enter zipcode. \n ; 
} 

^ if =''4lease correct the following errors, then resubmit 

f he form. 'Thank you.\n\n" + errorFields; 

alertCerrorFields) ; 
return false; 
} 

else { 

return true; 
} 

> 

<scri pt^l anguage="3avascri pt" src="src/uti 1 s . js"></scri pt> 
</head><body bgcolor."092186''> o'' 

eel 1 paddi ng="0" al i gn="center"> 

^ <td width="17" align="right"><img 

<;rr-"arfx/DOD cornerl.qif" width="20" height="20"></td> 

src- grrx/pop_corneri.giT bgcolor="C0D5FC" width="74"> </td> 

<td bgcolor="COD5FC" width="486"> </td> 

<td width="18" align="left"><img 

src="grfx/pop_corner2.gif" width="20" height="20"></td> 

</tr> 

*^^^td width="20" bgcolor="C0D5FC"> </td> 
<td width="74" bgcolor="cOD5FC"> ^_ . 
<a href="http: //www. eyardsigns.com ximg 
src-"arfx/evard imql.gif" border="0" width="70"></a></td> , 
src- grTX/eyara_nmy±.y width="486" bgcolor="cOD5FC" align="center"> 

<%Set ad = 

server.createobjectC-MSWC.AdRotator") %>^^ ad.GetAdvertisementC"inc/adrot_lng.txt") 

%> 
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</td> . , . 

<td width="20" bgcolor="cOD5FC"> </td> 

</tr> 

^^<td width="20" height="3" bgcolor="C0D5FC"><img 
src="grfx/bluespacer.gif" width="r height="l"></td> .... 

^ <td width="74" height-"3" bgcolor="COD5FC"><img 

src="grfx/bluespacer.gif" width="r height="r></td> „ ^ . - 

^ ^ <td width="486" height="3" bgcolor="C0D5FC"><img 

src="grfx/bluespacer.gif" width="l" height="r></td> „ . r n - 

^ <td width="20" height="3" bgcolor=:"C0D5FC"><img 

src="grfx/bl uespacer.gif" widths"!" height="r></td> 

</tr> 

^ <td width="20" bQColor="C0D5FC% </tcl> _ , 
<td widths" 74"><img src="grfx/logo_half .gif " width= 74 

height-"20"></td> „ . „ ^ -ix-. -xn 

<td width="486"><img src=grfx/l ogo_half2.gif 

width="60" height="20"></td> „ . 

<td width="20"> </td> 
</tr> 

^^<td width="20" bgcolor="C0D5FC"> </td> 
<td co1span="2" bgcolor="C0D5FC" height="37r 
valign=''top" align="center"> , . „ 

<!__ #include file="inc/database.inc — > 
<%'Code start , 

if not Request -FormC"first_name ) = then 

set rs = server. CreateObjectC'ADODB. Recordset ) 

'Get data in variables 

5Tracl<_id = Request. FormC'id") 

sUser„id = Request . Form("user") 

sFirst_Name = Request . Form("Fi rst_Name") ^ 

sMiddle_lnitial = Request. FormC"Middle_imtial ) 

sLast_Name = Request .FormC'Last_Name") 

sAddressl = Request. FormC'Addressl") 

sAddress2 = Request . Form("Address2") 

sCity == Request. FormC' city") 

sZipCode = Request. FormC'zipcode") 

sPhone = Request. Form("phone") 

sEmail = Request. Form("email") 

'Construct SQL 

sSQL = "INSERT INTO Volunteer 
(track„id,user_id, Join_Date,First_Name,Middle_.lntial ," + _ 

"Last_Name,Addressl,Address2, city, zipcode, phone, email) VALUES (" + sTrack_id + "," 

^ " suser_id + ",#" + cstr(Now) + "#,'" + sFirst_Name + 

+ sMiddle_lnitial + " ','"+_ _ ^ , ^ 

sLast_Name + "','" + sAddressl + " + sAddress2 

+ " ','"+ scity +"','" + SZipCode + _ 

' ^ "■,'"+ SPhone + " ','" + sEmail + "')" 

db. Execute sSQL 

'Take the volunteer ID out 

rs.open "Select * FROM volunteer WHERE track_id = " 

+ sTrack_id,db,l,l 

rs.MoveLast 

sVolunteer_ld = cstr(rs(0)) 
rs. Close 
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if not instrCl, Request, Form("question"),",") = -1 

then 

sArr_Question = 

spl i t (Request . FormC'question") , " , ") 

for i = 0 to ubound(sArr_Question) 
SSQL = "INSERT INTO 
volunteer_Question_Link (vo1unteer_id,Question_id) VALUESC' + 

svolunteer^id + + 

sArr_Question(i) + 

db. Execute sSQL 

next 

else 

SSQL = "INSERT INTO Vol unteer_Questi on_Li nk 

CVolunteer_id,Question_id) VALUES (" + _ 

sVolunteer__id + + 

Request. Form("questi on") + 

db. Execute sSQL 

end if 

'Insert the number of volunteers in Mail_TraGking 
SSQL = "SELECT COUNT(") FROM Volunteer where 

track_id = " + sTrack_id 

rs.Open sSQL.db 

SSQL = "UPDATE Mai l^Tracki ng SET Number.Volunteer = 
" + cstr(rs(0)) + " WHERE track_id = " + sTrack_.id 

db. Execute sSQL 

rs. close : set rs = nothing 
db. close : set db = nothing 

Response. Write "<p align='' center '><BR><BR><BR><BR>" 

Response. write "<font face=* Verdana, Arial, 
Helvetica' size=*2 '><B>Thank you.</B>" 

Response. write "<br><br><br><br>" 

Response. Write "<a 
h ref = ' javasc ri pt : wi ndow . cl ose () ' >cl ose wi ndow</a></f ont> " 

else%> 

<!-- #include file="inc/convert„trackid.inc" --> 
<form nanie="SiGNUP" action="volunteer_form.asp" 
method="post" onsubmit=" return checkFormC)"> 

<table width="100%" border="0" cellspacing="2" 

cellpadding="2"> 

<tr> 

<td align=" right" width="40%"><img 
src="grfx/voluneterr'.gif" width="8r heiqht="92" aliqn="middle"></td> 

<td width="60%"><font face="verdana, Arial, 

Helvetica, sans-serif" size=^"2"><b>l 

would like to <font size="+3" 
color="#FFFFFF"><i><font face="Times New Roman, Times, serif">volunteer 

</font></i></font>by<br> 
</b><i><font size="l">(you can choose more 
than one option)</font></i></font></td> 

</tr> 
<tr> 

<td width-"40%" aliqn^" right" bgcolor-"FFC926"> 
<input type="checkbox" name="question" 

value="r'> 

</td> 

<td width="60%" bgcolor="FFC926"><font 
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face="verdana, Arial, Helvetica, sans-serif" size="2"><b><font color="092186">Making 

Phone Cal 1 5</f ontx/bx/f ont></td> 
</tr> 

^^<td width="40%" align=" right" bgcolor="#FFD34F"> 
<input type-"checkbox" name="question" 

value-"2"> 

</td> 

<td width="60%" bgcolor="#FFD34F"><font 
face='Verdana, Arial, Helvetica, sans-serif" size="2"><b><font 
col or="092186">Hol ding 

a Fund rai ser</ f ontx/bx/ f on tx/t d> 
</tr> 
<tr> 

<td width="40%" align="right" bgcolor="#FFDB6F"> 
<input type="checkbox" name="question" 

value-"3"> 

</td> 

<td width="60%" bgcolor="#FFDB6F"xfont 
face="verdana, Arial, Helvetica, sans-serif" size="2"xbxfont 
color="092186">Walking _ ^ ^ 

Door to Door</font></bx/fontx/td> 
</tr> 

^^<td width="40%" align=" right" bgcolor="#FFE493"> 
<input type="checkbox" name="question" 

value="4"> 

</td> 

^ <td width="60%" bgcolor="#FFE493"xfont size="2" 

face="verdana, Arial, Helvetica, sans-serif"xb> 

<font color="092186">work on Election 

Day</f ontx/bx/f ontx/td> 

</tr> 
<tr> 

<td width="40%" align="right" bgcolor="#FFE493"> 
<input type="checkbox" nanie="question" 

value-"5"> 

</td> 

<td width="60%" bgcolor="#FFE493"><font 
face="verdana, Arial, Helvetica, sans-serif" size=:"2"xbxfont 
col or="092186">wri ting ^ .... 

1 etters</f ontx/bx/f ontx/td> 

</tr> 

^^<td width="40%" align=" right" bgcolor="#FFF3CE"> 
<input type=" checkbox" name="question" 

value="6"> 

</td> 

<td width="60%" bgcolor="#FFF3CE"xfont 
face=" Verdana, Arial, Helvetica, sans-serif" size="2"xbxfont 
color="092186">Other</font></b></font></td> 

</tr> 

<td colspan="2" align="right" height="5"x/td> 
</tr> 

<tr align="left"> 

<td colspan="2" bgcolor=:"092186"xfont 
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face="verdana, Arial, Helvetica, sans-serif" size="2"><b><font color=';#FFFFFF">Fin 

in Personal lnformation</font></b></ront></td> 
</t r><tr><td>&nbsp ; </td><td> 

<font face='Verdana, Arial, 
Helvetica" size="2"><b><font color="red">"</font> Requi red 
informati on</b></f ont></td> 

</tr><tr> 

<td 

align="right"><font face=" Verdana, Arial, Helvetica" size="2"><b>Fi rst Name<font 
color="red">*</font></b></font></td><td><input name="fi rst_name"></td> 

</tr><tr> 

<td 

align=:"right"><font face=" Verdana, Arial, Helvetica" size="2"><b>Middle 
ini ti al </b></f ontx/tdxtdxi nput name="Mi ddl e_lni ti al " si ze="l"></td> 

</t r><tr> 

<td 

align="right"><font face="verdana, Arial, Helvetica" size="2"><b>Last Name<font 
col or="red">*</font></b></f ontx/tdxtdxi nput name="last„name"x/td> 

</tr><tr> 

<td valign="top" 

align="right"xfont face="Verdana, Arial, Helvetica" 
size="2"xb>Address</bx/fontx/tdxtdxinput name="Addressl"xbr><input 
name="Address2"x/td> 

</trxtr> 

<td 

align="right"xfont face="Verdana, Arial, Helvetica" size="2"xb>City<font 
col or=" red">"</font></bx/f ontx/tdxtdxi nput name="Ci ty "x/td> 

</trxtr> 

<td 

align="right"xfont face=" Verdana, Arial, Helvetica" size="2"><b>zip Code<font 
color="red">*</font></bx/f ontx/tdxtdxi nput name="zipcode"x/td> 
. ^ : * - </trxtr> 

\^ <td 
align=:"right"xfont face="verdana, Arial, Helvetica" 
si ze="2"xb>Phone</bx/f ontx/tdxtdxi nput name="phone"x/td> 

</trxtr> 

<td 

align="right"xfont face="verdana, Arial, Helvetica" size="2"xb>Email<font 
col or=" red">*</font></bx/f ontx/tdxtdxi nput name="emai 1 "x/td> 

</tr><tr> 

<td 

col span="2">&nbsp ; </td> 

</tr> 
<input name="id" 

value="<%=sTrack„id%>" type="hidden"> 

<input name= user 

val ue="<%=sU5er_i d%>" type=" hi dden"> 

<tr align="center"> 
<td colspan="2"> 

<input type="submit" name="Submit" value="l 

agree to VOLUNTEER">  

<input type="button name= buttonl 
val ue="Cancel " oncl i ck=" j avascri pt : wi ndow . cl ose () "> 

</td> 
</tr> 
</table> 
</form> 

<%end if 
'code end%> 
</td> 

<td width-"20" bgcolor="C0D5FC"> </td> 
</tr> 
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<tr> 

<td width="20"><img src="grfx/pop„corner3 .gir 

width="20" height-"20"></td> , . . „ „ u 

<td width="74" bgcolor="COD5FC"> </td> 
<td width="486" bgcolor="cOD5FC"> </td> 
<td width="20"><img src="grfx/pop_corner4-gif 

width-"20" height-"20"></td> 

</tr> 
</table> 

</body></htm1> 
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<%@ Language=VBScnpt %> 

<html><head><title>List of Volunteers</title> 
<!-- #include file="inc/session_timeout .inc" --> 
<!-- #include file="inc/top_inc.inc" — > 
<!-- #include file="inc/database.inc" 

<td align="middle" va1ign="top"><%'code start%> .... - ^ ^ 

<font face=Werdana, AnaV size=' 3 *><B>Li st of 

volunteers</font></B><BR><BR> 

<%set rs = server. CreateOb]ect("ADODB. Recordset ) 

'check to see where its coming from 
if Request. Querystring("id") = then 
'Its from the search form 

SSQL = "SELECT DISTINCT 

a.volunteer„id,a.first_name,aJast„name,a.Join_Date, a. email FROM " + _ , . , 

"volunteer AS a, volunteer_question_hnk AS 

b WHERE a.user_id = " + sessionC"user") 

'Date 

if not Request. Form("sdate") = AND not 

Request. Form("edate") = then „ r - - a 

^ SSQL = sSQL + " AND (a.]oin_date 

BETWEEN #" + Request. FormC'sdate") + "# AND #" + _ ^„ ^ ^ ... ....n 

Request. FormC"edate") + #) 

end if 
' ci ty 

if not Request. Form("city") = then sSQL 
sSQL + " AND a. city like + Request . FormC"city") + 

* ■ ' ^ 'zipcode 

if not Request. FormC'zipcode") = then 
SSQL = SSQL + " AND a.zipcode like '" + Request. FormC"zipcode") + 

'Questions 

if not Request -Form("questi on") = then 
sQuestion = 

replaceCRequest.FormC'question"),", or b.question_id = ") 
*^ SSQL = SSQL + AND (b . questi on_i d 

" + SQuestion + ") AND a. volunteer_id = b. volunteer_id" 

end if .... 
SSQL ^ SSQL + " order by a.join_date DESC 

else 

'from mail tracking 

sTrack_id = Request. QueryStringC'id") 
SSQL = "select 

volunteer id,first_name,last_name,Join„Date, email FROM volunteer WHERE " 

SSQL = SSQL + "track_id = " + sTrack_id + 

order by join_date DESC" 

end if 

%> 

<table width="98%" border="0" cellspacing="l" 

cellpadding="r align="CENTER"> , ^ ^ . ^ ■ ^ n ^ ^ 

<TR bgcolor= C0D5FC xtd align="center"><font 

face=' Verdana, AriaV size='2' ><B>Name</B></font></td> 

<td align="center xfont face=' Verdana, Anal 

size=*2' ><B>3oining Date-Time</B></font></td> ^ ^ , , . 

<td align="center"><font face='Verdana, Anal' 

si ze= ' 2 ' ><B>Emai 1 </B></f ontx/tdx/t r> 

<%rs.open sSQL,db 
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if rs.EOF then 

Response.wri te "<tr><td 
colspan='3'bgcolor=*#D9E6FD*><font face=' Verdana, AriaV si2e='2'>No records 
found . </f ontx/tdx/t r>" 

else 

do until rs.EOF%> 

<t rxtd bgcol or="#D9E6FD"><font 

face=' Verdana, AriaV size='2'> 

<a 

href=" vol unteer_detai1s.asp?id=<%=rsC0)%>"><%Response. write rsCD + " " + 

rs (2)%></a></font></td> 

, <td bgcolor="#D9E6FD" xfont 

face=Werdana, AriaV size='2*x%=rs(3)%x/font></td> 

<td bgcolor="#D9E6FD" xfont 
face=' Verdana, AriaV size='2*x%=rs(4)%x/fontx/tdx/tr> 

<%rs. MoveNext 
loop 

end if 

rs. Close : set rs == nothing 
db. Close : set db = nothinQ%> 
<trxtd colspan="3" align="center"xBR> 
<formxinput type=button value="Back" 
one! i ck="hi story , back() ; " name=buttonlx/f ormx/tdx/t r> 

</table> 

<%'code end%> ^ „. . . „ 

<!-- #include file= inc/bottom_inc,inc --> 
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<%@ Language=VBScript %> 

<html xheadxti tl e>Search vol unteers</ti tl e> 
<!-- #include file="inc/session_timeout.inc" --> 
<!-- #include file="inc/top_inc.inc" --> 

<td align="middle"><%*Code start%> 
<form method="post" name="forml" 
action="volunteer_list.asp"> . „^„o/.. 

<TABLE border=0 cellPadding=l cellspacing=l width= > 

<TR> 

<TD colspan="3" xfont size-"3" face-" Verdana, Arial, Helvetica, 
sans-serif "><b>Search volunteers</b><BR> 

<font size="l">Leave the fields blank to get all 
records</font></font><BR><BR></TD> 
</TR> 

<TR> . . T , 

<TD width="10%"><font size="2" face-"Verdana, Anal, Helvetica, 
sans-serif "><b>Date</b></font></TD> _ . 

<TD width=:"25%"><font size="r face="verdana, Anal, Helvetica, 
sans-serif ">start Date (MM/DD/YY)</font><BR> <INPUT nanie=sdate 
value="<%=date%>"></TD> . ^ ^ . -^n ^ ^ ^ ^ 

<TD><font size="l" face="Verdana, Anal, Helvetica, sans-serif >End Date 
(MM/DD/YY)</font><BR> <INPUT name=edate value="<%=date%>"></TD> 
</TR> 

<TR> . ^ ^ . 

<TD><font size="2" face="verdana, Anal, Helvetica, 
sans-serif"><b>City</b></font></TD> 

<TD colspan="2"><lNPUT name=city></TD> 
</TR> 

<TR> . , , . 

. <TD><font size="2" face="Verdana, Anal, Helvetica, 
skns-sen f '><b>Zi p-code</b></font></TD> 

<TD TDlspan="2"><lNPUT name=zi pcode></TD> 
</TR> 

<TR> . , , , 

<TD><font size="2" face-"Verdana, Anal, Helvetica, 
sans-seri f "><b>Questi ons</b></f ont></TD> 
<TD colspan="2"><table> 

<tr> 

<td align-" right" > 

<input type-"checkbox" name="question 

value="l"> , . 

<Ad> , , , , 

<td><font face="verdana, Anal, Helvetica, 

sans-serif" size="2"><b><font color="#092186">Making 

Phone cal 1 s</f ontx/bx/f ontx/ td> 
</tr> 
<tr> 
<td > 

<input type="checkbox" name="question 

value="2"> 

</td> 

<td xfont face="verdana, Arial, Helvetica 
sans-serif" size="2"xbxfont col or="#092186">Hol ding 

a Fund raiser</f ontx/bx/f ontx/td> 

</tr> 
<tr> 

<td> . „ 

<input type="checkbox" name="question 

value="3"> 

</td> 

<td xfont face="verdana, Arial, Helvetica 
sans-serif" size="2"xbxfont col or="#092186">Wal king 
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Door to Door</font></b></font></td> 
</tr> 
<tr> 

<td> . „ 

<input type="checkbox" name="question 

</td> . , 

<td><font 5ize="2" face="Verdana, Anal, 

<font color="#092186">work on Election 

</tr> 
<tr> 

<"td> „ . „ 

<input type="checkbox'' name= question 



</td> , ^ , 

<td><font face="verdana, Anal, Helvetica, 

sans-serif" size="2"><b><font col or=:"#092186">wri ting 

1 etters</f ontx/bx/f ont></td> 

</tr> 
<tr> 

<td> , „ 

<input type="checkbox" name= question 

value="6"> 

</td> 

<td><font face="verdana, Arial, Helvetica, 

sans-serif" size="2% ^ ^ 

<b><font 

color=:"#092186">Other</font></b></font></td> 

</tr></table> 

- ~'<7tD> - 
</tr> 

<TR><td colspan="3" align="center"><input type="button'" name="buttonl" 
value="Bacl<" one! ick="hi story. backO"> , 

<input type="submit" name="subrmtl" va1ue= Search ></td></tr> 
</TABLE><!-- #inc1ude file="inc/bottotn_inc.inc" — > 
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<%@ Language=VBScript %> 
<HTML> 

<HEAD> 

<ti tl e>vo1 unteeri ng</ti tl e> 
<!-- #INCLUDE file="inc/top_inc.inc" — > 
<td>&nbsp ; &nbsp ; &nbsp ; </td><td cl as5=" normal ' > 
<!-- #INCLUDE file="inc/volunteering.inc" --> 

<!-- #INCLUDE file='Mnc/bottom_inc.inc" --> 
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<%© Language=VBScript %> 

<html><head> 

<ti tl e>vote</ti tl e> 

<scri pt 1 anguage=" Javascri pt"> 

function checkFormQ { 

errorFields = ^ ^ ^ 

if (trimCdocument. SIGNUP. name. value) ) { 

errorFields += "- Enter your nanne.\n"; 
} 

if (MsEmailval id (document. SIGNUP, email .value)) { 

errorFields Enter a valid email address in the form 

xxx®xxx.xxx.\n"; 

} 

if (errorFields != "") { . ^ . , . 

errorFields = "Please correct the following errors, then resubmit 

the form. Thank youAn\n" + errorFields; 

alert(errorFields) ; 

return false; 

} 

else { 

return true; 
} 

} 

</script> „ , -n . „ / 

<script language=" Javascript" src="src/utils.]s ></scnpt> 
</head><body bgcolor=:"092186"> „ _ „ ^ „ 

<table width="600" border="0" cellspacing="0" cellpadding=^ 0' align= center > 
<tr^ 

' '<td^wrdth="17" align="right"><img src="grfx/pop_cornerl.gif " width="20" 
height='7D"></td> . , 

<td bgcolor="COD5FC" width="74"> </td> 

<td bgcolor="C0D5FC" width="486"> </td> , 
<td width="18" align="left"><img src="grfx/pop_co rner2.gif width= 20 
height="20"></td> 
</tr> 

^ <td width="20" bgcolor="COD5FC"> </td> 

<td width="74" bgcolor="cOD5FC"> .. ^ , ^ ■ , u ^ 

<a href="http://www.eyardsigns.com"><img src="grfx/eyard_imgl.git border= 0 

width="70"></a></td> ^ . 

<td width="486" bgcolor="C0D5FC" align="center > 

<%Set ad = 

server. CreateObjectC'MSWC.AdRotator") %> . ,. 

<%= ad.GetAdvertisementC inc/adrot_lng.txt ) 

%> 

<td^wi dth="20" bgcol or="C0D5FC">&nbsp ; </td> 
</tr> 
<tr> 



wi 
wi 
wi 
wi 



<td width="20" height="3" bgcol or="COD5FC"><img src="grfx/bl uespacer.gif" 

dth="l" height="l"></td> „ . „ ^ 

<td width="74" height="3" bgcol or="COD5FC"><img src="grfx/b1uespacer.gif 

dth="l" height="l"></td> . „ ^ 

<td width="486" height="3" bgcol or="cOD5FC"><Tmg src="grfx/bluespacer.gTf 

dth="l" height="l"></td> „ . ., ^ 

<td width="20" height="3" bgcol or="C0D5FC"><img src="grfx/bluespacer.gif 

dth="l" height="r'></td> 



</tr> 
<tr> 

<td width="20" bgcol or="cOD5FC"> </td> 
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<td width-"74%<img src="grfx/l ogo_ha1f.gif" width="74" height="20"></td> 
<td width="486"><img src=^grfx/logo„half2 .gif " width="60" height="20' ></td> 
<td width="20"> </td> 
</tr> 

^ <td width="20" bgco1or="C0D5FC"> </td> 

<td colspan-"2" bgcolor="COD5FC" height-"371" valign="top" al-]gn= top 
align-"center"> 

<p> </p> 
<%if Request. Form("vote") = then%> 

<!-- #include file="inc/convert„trackid.inc" --> 
<!-- #include file="inc/database.inc" --><% 
set rs = server. CreateObjectC'ADODB. Recordset") 

sSQL = "select First_Name, Last„Name from Mail^Tracking WHERE track_id = " n 
sTrack__id 

rs.open sSQL,db ^ ^ 

if not rs.eof then sName = rsCO) " + rs(l) 

rs. Close : set rs = nothing 
db. Close : set db = nothing 

%> 

<form name="SlGNUP" action="vote_forrn.asp" method="post" onsubmit=" return 
checkForrti()"> 

<table width="100%" border="0" censpacing="2" cenpadding="2"> 

^^<td colspan="2" align="center" bgcolor="092186"><font face="Verdana, 
Arial, Helvetica, sans-serif" size="4><b><font color="#FFFFFF"> 

<%=sName%></font> <font size="3" color="FFC926">can count on my VOTE 
! </f ont></b></font></td> 
^ </tr> 

— ^^<td width="30%" a1ign="right" bgco1or="FFC926"> 
<input name="vote" type=" radio" value="l"> 

<td*^width="70%" bgco1or="FFC926"><font face="Verdana, Arial, Helvetica, 
sans-serif" size="3"><b><font size="4" color="092186">YES</font></b></font></td> 
</tr> 

^^3d width="30%" align="right" bgcolor="#FF3333"> 
<input name="vote type=" radio" value="0"> 

<td^width="70%" bgcolor="#FF3333"><font face="Verdana, Arial, Helvetica 
sans-seri f " si ze="4"><b><f ont col or="092186">NO</f ontx/bx/f ont></td> 
</tr> 

^^<td width="30%" aliqn="right" bgcolor="#CCFFCC"> 
<input name="vote" type="radio" value="2"> 

<td'^width="70%" bgcolor="#CCFFCC"><font face="verdana, Arial, Helvetica 
sans-seri f " si ze="4"><b><f ont col or="092186">UNDEClDED</f ontx/bx/f ont></td> 
</tr> 

*^^<td align="right" bgco1or="092186"xfont face="verdana, Arial, 
Helvetica, sans-serif" size="2"xbxfont color="#FFFFFF"> 

Name </tdxtd bgcolor="092186"> 

<input type="text" name="name"> 

</font></b></font></td> 
</tr> 
<tr> 

<td align="right" bgco1or="092186"xfont face="Verdana, Arial, 
Helvetica, sans-serif" size="2"xbxfont color="#FFFFFF"> 
Email Address </td><td bgcolor="092186"> 
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<input type="text" name='*email "> 
</font></b></font></td> 
</tr> 

^^<td width="30%" align="right"> </td> 

<td width=:"70%"> <b><font face=''verdana, Arial, Helvetica, sans-senf" 

^ <input type="submit" name-"Submit" value="cast my Vote'V  
<input type-"button" name="buttonl" va1ue="CanceV' 
one! i ck=" j avascri pt : wi ndow . cl ose Q "> 
</font></b></td> 
</tr> 

</table> . . , 

<input type="hidden" name="id" va1ue="<%=sTrack_id%> > 
<input type="hidden" name="user" value="<%=suser_id%>"> 
</form> 

<%e1se . „^ 

set db = Server. CreateObqect("ADODB. Connection ) 
set rs = server. CreateObjectC'ADODB. Recordset") 
pth = Server. mappathC'yardsign.mdb") 

db.open "DRlVER={Microsoft Access Driver (-.rndb)}; DBQ="&pth 
sTrack_id = Request . Form("id") 

sSQL = "INSERT INTO vote Ctrack_i d , user_i d , name , einai 1 , vote_date , vote) VALUES 

(" + _ 

sTrack_id + + Request. Form("user") -h + Request. Form("name") + 
+ Request. FormC'email") + "\#" + - „ 

cstr(Now) + "#,'" + Request. FormC' vote") + ')" 
db- Execute sSQL 

' ' ''^'^Insert number of voters in eYardsign Responses 

•«QL = "SELECT C0UNT(*) FROM vote WHERE tracl<_id = " + sTrack_id 
rs.Open sSQL,db 

SSQL = "UPDATE Mai l_Tracki ng SET Number_vote = " + cstrCrs(O)) + " WHERE 
track_id = " + sTrack-id 
db. Execute sSQL 

rs. Close : set rs = nothing 
db. Close : set db = nothing 

Response. write "<BR><BR><BR><BR><p align='center xfont size= 2 
face=' Verdana, Arial," + _ , , , ^ -.l. i 

" Helvetica, " + "sans-serif ><b>Your Vote has been added. <BR>Thank 
you . </b></f ont>" 

Response . Wri te "<BR><BR><BR><BR>" 

Response. write "<a href=' javascript :window. closeO '>close 
wi ndow</a></f ont></p>" 
end if%> 
</td> 

<td width="20" bgcolor="C0D5FC"> </td> 
</tr> 

^^<td width="20"><img src="grfx/pop_corner3.gif" width="20" height="20"></td> 
<td width=:"74" bgcolor="C0D5FC"> </td> 

<td width="485" bgcolor="C0D5FC"> </td> . „ 

<td width="20"><img src-"grfx/pop.corner4.gif" width="20" height= 20 ></td> 
</tr> 

</tabl e> 

</body></html> 
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<%@ Language=VBScript %> 
<html><head><title>Li5t of voters</title> 
<!-- #include file="inc/session_timeout.inc 
<!-- #include file="inc/top_inc.inc" — > 
<!-- #include file="inc/database.inc" --> 

<td align="center" valign="top"><%'code start%><BR> 

<%set rs = server. CreateObject("ADODB. Recordset") 

'Start vote Graph 
Dim ivotesC2) : Dim bFlag(2) 
Dim sColorsC2) : Dim sText(2) 
Dim iVotesPC2) 



"undecided" 
scolors(2) = "Teal" 



'Define Text ^ ^ 

sText(O) = "no" : sText(l) = "Yes" : sText(2) = 

'Define Colors 

sColors(O) = "Red" : sColors(l) = "Green : 



sTrack_id = Request .QueryString("id") 
for i = 0 to 2 

sSQL = "select countC*) from vote where 

track_id = " + sTrack_„id + " AND vote = " + cstrCi) 

rs.open sSQL,db 
ivotes(i) = rs(0) 

if ivotes(i) = 0 then bFlagCi) = true 
i Total = i Total + i Votes (i) 
rs. Close 

next 

for i = 0 to 2 
" : ~ — ^ ^ ivotesP(i) 

f ormatnuffiber ( (i Votes (i )/i Total ) *100 , 1) 

next%> 

<table width="70%" border="0" cellpadding="2" 

censpacing="l"> , , „ ^ n ^ n 

^ <tr bgcolor="C0D5FC"><td colspan= 3 

aliqn="center"><font face=' Verdana, AriaV size-'3' ><B>vote Graph</B></td></tr> 

<%for i = 2 to 0 step -1%> . , , 

<tr bgcolor="#D9E6FD"><td width="10%" 
align="right"><font face=' Verdana, AriaV size='2' ><%=sText(y%>y^^ 

^ ^ <table width="100% ><tr><%if not bFlag(i) 

then%><td width="<%-i votesPCi)%>%" bgcolor="<%=sColorsCi)%>"> </td><%end if%> 

<td <%if bFlag(i) then Response -Wnte 
"colspan='2'"%»<font face='verdana, AriaV 

size='l'><%=ivotesP(i)%>%</font></td></tr></table></td> _ „ „ o..^ u n 

^ / width="10%" aliqn="center"><%if bFlagCO 

then Response. write ivotes(i) else Response.wri te "<a href= vote„list.asp?id=" + 
sTrack„id + "&list-" + cstr(i) + "">" + cs trCi votes CO )%></a></td></tr> 

<%next%> 

<tr bgcolor="#D9E6FD" xtd colspan="2" 
align-" right "xfont face=' Verdana, Anal' size='2' ><B>Total</B></td> 

<td align="center"><a 
href="vote_list.asp?id=<%=sTrack_id%>"><%=iTotal%></a></td></tr> 

</table> 

<%'End vote Graph%> 

<BR> . 
<table width="90%" border="0" cellspacing="l" 

cellpadding="l" align="CENTER"> . „ „ 

. <TR><td align="center" colspan='3 > 
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<font face=Werdana, AriaV size=*3'><B>List of 

Voters</font></B></td></tr> M^nr>cn^" 

<TR bgcolor= C0D5FC > . 
<td align="center"><font face=' Verdana, Anal 

size='2' ><B>Name</B></font></td> ^ ^ . . . • n 

<td align="center"><font face= 'Verdana, AnaV 

size='2' ><B>Date-Time</B></font></td> , . . • n. 

<td align="center"><font face=' Verdana, Anal' 

size='2' ><B>Vote</B></font></td></tr> 

<% 

if not Request. QueryStringC'li St") = then sFilter 
= " AND vote = " + Request. Querystring("list") 

sSQL = "select name, email,vote_date, vote FROM vote WHERE track_id = 

sTrack_id + sFilter + " order by vote_date DESC" 
rs.Open sSQL,db 

dim sArr„voteC2) 
sArr_Vote(0) = "No" 
sArr_Vote(l) = "Yes" 
sArr_Vote(2) = "Undecided" 

if rs.EOF then 

Response -Write "<TR><TD co1span= 3 
bgcolor=*#D9E6FD'><font face=' Verdana, AriaV size='2'>No records 
found . </font></td></tr>" 

else 

do until rs, EOF%> 

<tr><td bgcolor="#D9E6FD" xfont 

face=' Verdana, AriaT size='2'> 

<a 

href="mailto:<%-rsCl)%>"><%=rs(0)%></aW^ n^^Q^^^n" w-Fnni- 

<td bgcolor= #d9e6fd xtont 

face=Werdana, AriaV size='2'><%=rs(2)%></font></td> n.^a^.^n- 

<td bgcolor= #d9e6FD 

align="center"><font face=' Verdana, Arial' 
size='2'><%=sArr„vote(rsC3))%></font></td></tr> 

<%rs.MoveNext 

loop 

end if 

rs. close : set rs = nothing 
db. close : set db = nothing%> 
</table> 

<form><input type=button value= Back 
oncl i ck="document . 1 ocati on= ' t racki ng . asp ' " name=buttonl></f orm> 
<%'code end%> #include file="inc/bottom„inc.inc" --> 
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<%© Language=VBScript %> 

<!__ #include file="inc/session_timeout.inc" --> 
<!-- #include file="inc/top_inc.inc" — > 

<td align="middle"><%'Code 5tart%> 

<form method="post" name="formr'^ action="voter_list .asp 
<TABLE border=0 cenpadding=l cellSpacing^l width="98%"> 
<TR> 

<TD colspan="3" xfont size="3" face="verdana, Arial, Helvetica, 
sans-serif "><b>Search Voters</b><BR> 

<font size="l">Leave the fields blank to get all 
records</font></font><BR><BR></TD> 

</TR><TR> . . . , , . 

<TD width="15%"><font size="2" face="verdana, Anal, Helvetica, 
sans-serif "><b>Date</b></font></TD> . 

<TD width="25%"><font size="r' face="Verdana, Anal, Helvetica, 
sans-serif ">Start Date (MM/DD/YY)</font><BR> <INPUT name=sdate 
value="<%=date%>"></TD> . , , . .j:,. ^^^^ 

<TD><font size="l" face="Verdana, Arial, Helvetica, sans-senf >End Date 
(MM/DD/YY)</font><BR> <INPUT name=edate value="<%=date%>></TD> 

^^<td^colspan="3" align="center"><BR><input type="button" name="buttonl" 
val ue="Back" oncl i ck=" javascri pt : document . 1 ocati on= ' dei;aul t .asp > 

<input type="submit" name="submitl" value="Search"></td></tr> 
</TABLE><!-- #include file="inc/bottom_inc.inc" — > 
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<%@ Language=VBScript %> 
<html><head><title>Li St of Voters</ti tle> 
<!-- #include file="inc/session_timeout .inc" --> 
<!— #inc1ude file="inc/top_inc.inc" --> 
<!-- #include filG-"inc/database.inc" --> 

<td align=" center" valign="top"><%'code start%><BR> 

<%set rs = server. createObject("ADODB. Recordset") 

Dim i votes (2) 

'Date 

if not Request. FormC'sdate") = AND not 

Request. FormC'edate") = then 

sSQLl = " AND (vote.date between #" + 

Request. FormC'sdate") + "# and #" + _ 

Request. FormC'edate") + "#)" 

end if 

for i = 0 to 2 

SSQL = "select COUNT C^) FROM vote WHERE 
user^id = " + sessionC"user") + sSQLl + " and vote = " + cstrCi) 

rs.Open sSQL,db 
ivotes(i) = rs(0) 
rs. close 

next 

iTotal = ivot€s(l)+ivotes(0)+iVotesC2) 
if not iTotal = 0 then 
iYesP = 

formatnumberCCiVotesCD/iTotal) -100,1) 

iNoP = 

f b rniat riCimbe r ( (i Vo t es (0) /i Total ) *100 , 1) 

— iundecidedP = 

f ormatnumber ( (i votes (2) /i Total ) *100 , 1) 

else 

iYesP = 0 : iNoP = 0 : iundecidedP = 0 

end if 

%> 

<table width="70%" border="0" cellpadding-"2" 

censpacing="r'> 

<tr bgcolor="cOD5FC" xtd colspan="3" 
align="center"><font face=' Verdana, AriaV size='2' ><B>Vote Graph</B></td></tr> 

<tr bgcolor="#D9E6FD" xtd width="10%" 
align="right"><font face^^' Verdana, AnaT size='2' >Yes</font></td><td> 

<table widths" 100%"><tr><td width="<%-iYesP%>%" 
bgcolor="green"> </td><td><font face=' Verdana, AriaV 
51 ze= ' 1 ' ><%=i YesP%>%</f ontx/tdx/t rx/tabl e> 

</tdxtd width="10%" align="center"xa 
h ref =" j avascri pt : document . f orml .list. val ue= ' 1 * ; document . f orml . submi t () "><%=i Votes (1) 
%></a></td> 

</tr> 

<tr bgcolor="#D9E6FD" xtd width="10%" 
align="right"><font face=' Verdana, Anal' size='2' >No</fontx/tdxtd> 

<tablG widths" 100%"xtrxtd width="<%=iNoP%>%" 
bgcolor="red"> </tdxtdxfont face= 'Verdana, Arial' 
si ze= ' 1 ' ><%=i NoP%>%</f ontx/tdx/t rx/tabl e> 

</tdxtd width="10%" align="center"xa 
h ref =" 3 avascri pt : document . f orml .list, val ue= ' 0 * ; document . f orml . submi t Q "x%=i Votes (0) 
%x/ax/td> 

</tr> 

<tr bgcolor="#D9E6FD" xtd width="10%" 
align="right"xfont face=' Verdana, Anal' size=*2' >Undeci ded</font></td><td> 

<table width="100%"><trxtd 
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width="<%=iundecidedP%>%" bgco1or="teal"> </td><td><font face=' Verdana, AriaT 
si 2e= * 1 • ><%=i Undeci dedP%>%</f ontx/tdx/t rx/tabl e> 

</td><td width="10%" a1icin="center"><a 
h ref =" j avascri pt : document , f o rml . 1 i st . val ue= ' 2 ' ; document . f orml . submi t () "><%=i votes (2) 
%></a></td> 

</tr> 

<tr bgcolor="#D9E6FD" xtd colspan="2" 
a1ign="n"ght"xfont face=' Verdana, AnaV size='2' xB>Total</Bx/td> 

<td align="center"><a 
href =" javascript: document, f orml. submi tO"><%=iTotal%x/ax/tdx/tr> 

</table> 
<BR> 

<tab1e width="90%" border="0" cellspacing="l" 

eel 1 paddi ng="l" al i gn="CENTER"> 

<TRxtd aliqn="center" colspan="3"> 

<font face= Verdana, AriaV size=*3'xB>List of 

Voters</fontx/Bx/td></tr> 

<TR bgcolor="cOD5FC"> 

<td aTign="center'*xfont face=* Verdana, AriaV 
si ze= ' 2 ' ><B>Name</Bx/f ontx/td> 

<td a1ign="center"xfont face=' Verdana, AriaT 
si 2e= ' 2 * xB>Date-Ti me</B></f ontx/td> 

<td align="center"xfont face=' Verdana, AriaV 
si 2e= ' 2 ' ><B>Vote</Bx/f ontx/tdx/t r> 

<% 

if not Request. formC"list") = then sFilter = " 
AND vote = " + Request.form("list") 

sSQL = "Select name,email ,vote_date, vote from vote WHERE user_id = " 

+ - 

"* ^ Session("user") + sFilter + sSQLl + " order by vote„date desc" 

rs.Open sSQL,db 

dim sArr.Vote(2) 
sArr_vote(0) = "No" 
sArr„vote(l) = "Yes" 
sArr_vote(2) = "undecided" 

if rs. EOF then 

Response. Write "<trxTD colspan='3* 
bgcolor='#D9E6FD'><font face=' Verdana, Arial" size='2*>No records 
found . </f ontx/tdx/t r>" 

else 

do until rs. EOF%> 

<trxtd bgcolor="#D9E6FD" xfont 

face=' Verdana, Arial' size='2*> 

<a 

href ="mai 1 to : <%=rs (l)%>"x%=rs (0)%x/ax/f ont></td> 

<td bgcolor="#D9E6FD" xfont 
face=' Verdana, AriaV size=*2*x%=rs(2)%x/fontx/td> 

<td bgcolor="#D9E6FD" 

align="center"xfont face=' Verdana, Arial' 
size=*2'x%=sArr_voteCrsC3))%x/fontx/tdx/tr> 

<%rs.MoveNext 

loop 

end if 

rs. close : set rs = nothing 
db. close : set db = nothinq%> 
<trxtd colspan="3" align= center"> 
<form name="forml" method="post" 

acti on="voter_l i st , asp"> 

<input type=hidden 
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value="<%=Request.Form("sdate")%>" name="sdate"> 

<input type=hidden 

value="<%=Reque5t.FormC'edate")%>" name='*edate"> „. . „ 

<input type=hidden name= list > 
<input type=button value="Back" 
oncl i ck="document . 1 ocati on= ' vote_search . asp ' " name=buttonl> 

</form> 
</td></tr> 
</table> 



<%'code end%> 



<!— #include file="inc/bottom_inc.inc" 
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whyemail.htm 

<html> 
<head> 

<title>eYardsi gns.com | why we need your e-mail?</tme> 
</head> 

<body link="#003366" alink="#999999" vlink="#333333"> 

<table width='550" align="center" cellpadding="2" censpacing="0" border="0"> 

^t^val i gn="top" bgcol or="#000000"> 
<div align=center> 

<table bgcolor="C0D5FC" width="550" cellpadding=0 cellspacing=0 border=0> 
<tr> 

<td align="center" colspan=2 valign=middle><br><font 
face=verdana,arial .helvetica, sans-serif size=3><b>why Do We Need Your 
e-mai 1 ?</b></font><br><br> 

</td> 

</tr> 

</table> 

<table bgColor=#D9E6FD width="550" cellpadding^O cellspacing^O border=:0> 
<tr> 

<td width="20"> </td> 
<td> 

<fpnt face=verdana, aria! .helvetica, sans-serif si2e=2><b>The real question is: why do 
you 'want' us to have your <nobr>e-mail?</b></nobr> 

Two reasons. To keep you up to date on <nobr>electionmall .com</nobr> activities via 
email newsletters 

Second: you use your e-mail address to recover your password should you ever 

forget it. 

<br><br></font> 

</td> 

<td width="20"> </td> 

</tr> 

<tr> 

<td align="center" colspan="3"> ^ . , . ^ . .j, 

<a href=" javascri pt : wi ndow. cl ose() ; "><f ont f ace=ari al , hel veti ca , sans-sen f 
si ze=3>cl ose wi ndow</f ont></a><br> 
  

</td> 
</tr> 

</td> 
</tr> 
</table> 

</td> 
</tr> 
</tabl e> 
</body> 
</html> 
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<HTML> 
<HEAD> 

<TiTLE>why we need your URL</TITLE> 

</HEAD> 
<BODY> 

<TABLE align=center border=0 cenpadding=2 cellSpacing^O 

sty1e="HElGHT: 272px; width: 555px" width=550> 

<T80DY> 

<TR> 

<TD bgCo1or=#000000 vAlign=top> 
<DIV align=center> 

<TABLE bgco1or=#c0d5fc border=0 cellPadding=0 cellspacing=0 width=550> 

<TBODY> 
<TR> 

<TD align=midd1e colSpan=2 vAlign=center><BR><FONT face=Verdana><B>why Do we 
Need Your <SPAN class=300181219-04072000>URL 

Address</SPAN>?</B><BR><BR></FONT></TD></TR></TBODY></TABLE></DIV> 
<TABLE bgColor=#d9e6fd border=0 cellPadding=0 cellSpacing^O width:=550> 
<TBODY> 

<TR> 

<TD width=20> </TD> 

<TD><BR> 

<P><FONT size=2><F0NT f ace=verdana><SPAN class=300181219-04072000>Reason one: 
</SPAN><SPAN class=300181219-04072000>when you create and send out your 
eYardSigns, the reci</SPAN><SPAN class=300181219-04072000>pients will have the 
opportunity to visit yo</SPAN><SPAN class=300181219-04072000>ur </SPAN><SPAN 
cl ass=300181219-04072000>h</SPAN><SPAN cl ass-300181219-04072000>ead quarters 
(campaign site); this URL should be </SPAN><SPAN class=300181219-04072000>the 
address you would like them to visit.</SPAN></FONT></FONT> 

<P><SPAN' elass=300181219-04072000></SPAN><FONT size=2><F0NT face=verdana><SPAN 
class=30©i81219-04072000>Reason two: Increase your site viewership by 
di recti y</SPAN><SPAN class=300181219-04072000> tar</SPAN><SPAN 
class=300181219-04072000>geting your voter's and volunte</SPAN><SPAN 
class=300181219-04072000>er's via eYardSigns, and then having them</SPAN><SPAN 
class=300181219-04072000> visit your he</SPAN><SPAN 

cl ass=300181219-04072000>ad</SPAN><SPAN cl ass=300181219-04072O0O>quarters , 
campign platforms, campaign party, or e</SPAN><SPAN 
class=300181219-04072000>ndorsements sites.</SPAN></FONT></FONT> 
<P><SPAN class=300181219-04072000></SPAN><FONT size=2><F0NT face=verdana><SPAN 
class=300181219-04072000>So why not fill in all the appropriate URL addresses 
you would like your eYardSign recipi</SPAN><SPAN class=300181219-04072000>ents 
to visit?</SPAN></FONT></FONT><FONT f ace=Verdana><FONT 

size=2><BR></ FONTx/ FONTx/ P></TD> 

<TD width=20> </TD></TR> 

<TR> 

<TD aliqn=middle colSpan=3><A href="javascript:window.closeO ; xFONT 
face=anal , helvetica, sans-serif size=3>close window</FONT></A><BR> 
</TD></TR></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></SPAN></FONT> 

</BODY> 
</HTML> 
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<FORM acti on=http : //I ogi n , yahoo . com/conf i g/1 ogi n?4apqpgl phlsl p method=post 
name=:a autocomplete="off "xINPUT name=.t nes type=hidden value=l> <INPUT 
name=.src type=hidden value=ab> <INPUT name=.last type=hidden> <INPUT name=promo 
type=hidden> <INPUT nanie=.intl type=hidden value=us> <INPUT name=. bypass 
type=hidden> <INPUT nanie=. partner type=hidden> <INPUT name=.chkP type=hidden 
value=Y> <INPUT name=.done type=hidden 

val ue=http : //address . yahoo . com/yab/us? . rand=1100661313&amp ; > 

<TD align=right nowrapxFONT face=Arial si ze=-l> Yahoo! id:</font></td> 

<TD><INPUT maxLength=32 name=1ogin></TD></TR> 

<TR> 

<TD align=right nowrapxFONT face=Arial si2e=-l>Password:</FONTx/TD> 
<TDxiNPUT maxLength=32 name=passwd type=pa5sword value=""x/TDx/TR> 

<TR> 

<TD align=middle colSpan=2 nowrapxFONT face=Arial size=-lxlNPUT 
name=. persistent type=checkbox value=Y>Remember my ID Samp; Password ( <A 
h ref ="http : //he! p . yahoo . com/hel p/us/edi t/edi t-19 , html ">What ' s 
thi S?</A>)</FONT></TD></TR> 

<TDxlNPUT type=submit value="Sign in" id=submitl name=submi tl> </TDx/TR> 
</form> 
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< B R > 

<BR>Thanx , 

< B R > 

<BR>GloriaLook around my website. 

< B R > 

<BR>Love 

< R > 

< B R hris Hohnvote for me and i wonDt take 
most of your moneywhat do you think? 

<BR>I think youDd be a good JudgeThere wil 
1 be a Young Professionals for Bush recept 
ion, sponsored by the 

<BR>IL Bush campaign, on Tuesday, Duly 11 
5-7 PM at Jillyns Bar, 1007 N. Rush St., 

<BR>Chicago. Free admission. 

< B R > 

<BR>Elect ionmall.com will help Al Gore mar 
ket himself to internet users. Use Election 
mall.com and you can market Al Gore over t 
he Internet. v 

< B R > 0 

< B R > t 

< B R > e 

<BR> forme 

< B R > or 

< B R > e 
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< B R > s 

<BR> e vote 

< B R > for 

< B R > me 

< B R > or 

< B R > else 

<BR> welcome to eyardsigns. check this ou 

tThis is a message 

< B R > 

<BR>yippee yol, Marisol, will make sure th 
ere are parties everyday!!! check out my s 
i t e . 

13 < B R > 

1:; <BR>Help me increase traffic. 

yQ < B R > 

m <BR>Chris Hohncheck out my site!!! 
y < B R 

<BR>chris Hohnlf elected Senator, I will r 
aise the salary of all the secretaries in 
H the nation to exceed their bosses, whose j 
y obs they do anyway. 

ill < B R > 

Q <BR>Also, all highway construction wilj be 
done at night, if elected senator, i will 
raise the salary of all the secretaries in 
the nation to exceed their bosses, whose ] 
obs they do anyway. 

< B R > 

<BR>Also, all highway construction will be 
done at night, check this site out!! 

< B R > 

<BR>www.electionmall .com 

< B R > 

<BR>For more information contact : 312-933 
- 7 2 8 4 DQD LVAL'xCDD D 0 

<BR>paperl oop. com dai 1 y 

news service 
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< B R > 



< 



BR>welcome to paperloop.com, the premier 



<BR>information and exchange service for t 
h e 

<BR>paper, pulp, converting, and printing 
industries. 

< B R > 

<BR>Monday, Duly 3, 2000 

< B R > 

< B R > 

<BR> 



<BR>Copyright 2000 paperloop.com. All righ 
ts reserved. 

<BR>This material is copyrighted and shoul 
d not be forwarded, 

<BR>reproduced, printed, or distributed wi 
thout permission. 



< B R > ~ 
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< B R > 

< B R > 

i( it if 



iciciiiiitifititif 



•ic it i: i( it i: 



< B R > 

<BR>TodayDs Headlines: 

< B R > 

<BR> * CMPC revises plan for Puente Alto m 

ill in Chile 

<BR> * NZDs FCL shareholders set to approv 

e paper sale 

<BR> * second accord in Canadian lumbe^r wo 
rkersD dispute 

<BR> * Slovak SCR sells 50 percent to Aust 
riaas Neusiedler 

<BR> * Dexter rejects iSPDs $45 offer as i 
nadequate 

<BR> * Howard Smith buys Carter Holt unit 

<BR> * MetsoQs Neles Au to mation and Endres 
-si-V'Ha^u ^er announce an alliance 



< B R > * 
e r 

< B R > 

< B R > 

< B R > 



UPM-Kymmene sets up e-business cent 



<BR>Todayns stories 

< B R > 

< B R > 



<BR>CMPC revises plan for Puente Alto mill 
i n Chile 



Chilean pulp 



< B R > 

<BR>BRUSSELS, July 3, 2000 

and paper 

<BR>producer, Empresas CMPC, has chosen a 
supplier 

<BR>for its new waste-based corrugating ma 
terials pm 

<BR>at the Puente Alto mill. 

Page 76 



yardsign.mdb 

<BR> <http://www.paper1oop.eom/inside/s 
tories/wk07„03„2000/01.shtm1> 



< B R > 

< B R > 



<BR>Fletcher challenge shareholders to vot 
e on paper sale 

< B R > 

<BR>WELLINGTON, 3uly 3, 2000 - shareholdDDD 
LVAL U U Pers of Fletcher 

<BR>Challenge of New Zealand will meet torn 
orrowto 

<BR>vote on the $2-5 billion sale of the p 
aper division 

<BR>to Norske Skog of Norway. 

<BR> <http://www.paperloop.eom/inside/s 
tori es/wk07„O3_2000/r02 . shtml > 

< B R > 



"i! <BR>Forestry workers in northern B.C. reac 
J h tentative agreement 

3 < B R > 

1 <BR>VANCOUVER. July 1, 2000 - On Saturday, 
forestry workers 

<BR>agreed to a tentative contract with em 
ployers in 

<BR>the northern region of British columbi 
a , 

<BR>but thousands continued to strike agai 
nst sawmills in 

<BR>the B.C. coastal region, 

<BR> <http://www.paperloop-com/inside/s 
tories/wk07_03„2000/r07.shtml> 



< B R > 

< B R > 



<BR>Slovak sells stake to AustriaDs Neusie 
d 1 e r 
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< B R > 

<BR>BRATISLAVA, Duly 3, 2000 

rok has sold 

<BR>50 percent of its shares for $80 milli 
ontoNeusiedlerof 

<BR>Austria, a subsidiary of Mondi of Sout 
h Africa, according 

<BR>to a newspaper report. 

<BR> <http://www.paperloop.eom/inside/s 
tories/wk07_03_2000/r06.shtml> 

< B R > 

< B R > • ' - . - . . 



<BR>Dexter rejects ISPDS $45 offer as inad 
equate 

< B R > 

<BR>WINDSOR LOCKS, Conn., Dune 30, 2000 
Dexter corp. 

<BR>today announced that its board of dire 
-c-t-o'r'^s- unanimously 

<BR>'r ejected international specialty Produ 
cts Inc. OS tender 

<BR>offer to its shareholders as inadequat 
e and not in 

<BR>the best interests of its shareholders 

<BR> <http://www.paperloop.eom/inside/s 
tories/wk06„26_2000/77.shtml> 



< B R > 

< B R > 



<BR>Howard smith buys 
tors 

< B R > 



carter Holt Distribu 



Howard smith sa 



<BR>SYDNEY, July 3, 2000 
id today that 

<BR>its purchase of carter Holt Harvey Dis 
tributors would 

<BR>add NZ$50 million in turnover to its N 
ew Zealand 
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<BR>busi nesses . 

<BR> <http://www,paperloop.com/inside/s 
tories/wk07_03„2000/r04.shtml> 

< B R > 

<BR>... 



<BR>MetsoDs Neles Automation and Endress + H 
a u s e r a DD dlval a 



nnounce an alliance 

< B R > 

<BR>HELSINKI, July 3, 2000 - Metso corp. OS 
Automati on 

<BR>and control Technology business area, 
H- e - 1 ■ e^-s Automation, 

<BR>'and Endress + Hauser international Holdi 
ng announced today 

<BR>the intention to form an alliance for 
joint technology 

<BR>development and sales activities. 

<BR> <http://www.paperloop.eom/inside/s 
tori es/wk07_03_2000/03 . shtml> 

< B R > 

<BR> • 



<BR>UPM-Kymmene of Finland establishes e-b 
usiness center 

< B R > 

<BR>HELSINKI, Duly 3, 2000 - UPM-Kymmene C 
orp. of Finland 

<BR>said today it has established a new bu 
siness center 

<BR>for e-commerce. 

<BR> <http://www.paperloop.eom/inside/s 
tori es/wkO7_03_20O0/r05 . shtml> 
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< B R > 

< B R > 

< B R > 

<BR> 



<BR>*** interested in advertising in this 
newsl etter 

<BR> or on paperloop.com? 

< B R > 

<BR>contact Lisa Brayer at mailto:lbrayer@ 
paperloop.comor 

<BR>Call: +1.415.538,3813 



< B R > 

< B R > 



< B R > 

< B R > 

< B R >H3 a perloop.com Daily News service 

< B R > 

<BR> <http://www.paperloop.com> 

< B R > 

<BR>Customer service: 

<BR> 24/7 e-customer service available! 

<BR> <http://www.paperloop.com/customer_ 
service. html> 

<BR> Phone: +1.415.538.3888 

<BR> Email: info@paperloop.com 

< B R > 

<BR>Forgot your password? 

<BR> <http://www.paperloop.com/lostpw.ht 
m > 

< B R > 

< B R > 

<BR> 
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<BR>Thanks , 

< B R > 

<BR>Kesh Patel 
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< B R > 

<BR>Thanks , 

< B R > 

<BR>Kesh Patel 
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<BR>electionmall.comclicking on one of t 
links below the eYardSign. 



< B R > 

<BR>I have sent this 
to my friends and fam 
d our site as most of 
.com is only one of e 
tionMall.com. This i 
eYardSign does, I th 
ould help in iust pre 
and click the links 
utton is inactive in 
est still work, pleas 
irections on each lin 



electronic YARD sign 
ily. we have launche 
you know. eYardSign 
ight dot. corns in Elec 
s a smaple of what an 
ought that you guys c 
tending to be a voter 
below. The donate b 
this case. But the r 
e help by following d 
k below. 
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<BR>Thanks , 



< B R > 



<BR>Kesh Patel 

<BR>electionmall.comHi there, please supp 
rt my campaign. 
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Mr. Farmer: 

< B R > 

<BR>it was a pleasure to speak w i t h you t h 
is afternoon. as I mentioned earlier, 

<BR>THis is the worlds first eYARDSIGNll 
I will keep this short and simple. 

< B R > 

<BR>Simply click on the 5 links be! o w the 
yardsign, to see what this HYPE is all 

<BR>about. we would like to utilize and c 
reate a strategic partnership with 

<BR>Campai gnCont ri buti on . com . 

< B R > 

<BR>Let me know what you thinkl! 

< B R > 

<BR>Kesh Patel 
<BR>Co-Founder & 

<BR>chief operating officer 
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<BR>ElectionMall.com TESTING only... 

< B R > 

<BR>. .clicking on one of the links below t 
he yardsign. 

< B R > 

<BR>I have sent this electronic yard 
<BR>sign to my friends and family. we hav 

e 

<BR>launched our site as most of you know. 

< B R > - 

< B R > 

<BR>eYardSign.com is only one of eight dot 

0 .corns in ElectionMall.com. 

<BR>This is a sample of what an eYardsign 
^^does, I thought that you guys 

1 < B R > c o u 1 d help in just p r e t e n d i n g t o be a 
[11 voter, by clicking on the links below. 

? " < ^ R > T he donate button is inactive in this 
^JcaseT But the rest still work, please 

n <BR>help by following directions on each 

<BR>link below. Also send to your f r T e n d s 
a as well, by clicking send-to-a-friend!! 

I i: 3 

< B R > 

^ <BR>Thanks, 

< B R > 

<BR>Kesh Patel 
<BR>el ecti onmal 1 . com 
<BR> TESTING ONLY... 

< B R > 

<BR>, .clicking on one of the links below t 
he yardsign. 

< B R > 

<BR>I have sent this electronic YARD 
<BR>sign to my friends and family. We hav 

e 
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<BR>launched our site as most of you know. 

< B R > 

< B R > 

<BR>eYardSign.com is only one of eight dot 
.corns in ElectionMall.com. 

<BR>This is a sample of what an eYardSign 

does, I thought that you guys 

<BR>could help in just pr e t e n d i n g t o be a 
voter, by clicking on the links below. 

<BR>The donate button is inactive in this 
case. But the rest still work, please 

<BR>help by following directions on each 

<BR>link below. Also send to your_ f r i e n d s 
pas well, by clicking send-to-a-friend!! 

!S- < B R > 

i£| <BR>Thanks , 

fn < B R > 

0 B-R >-lCe s h P a t e 1 

< B R >% lectionmall.comDD 

LVAL □ xD2D0a Dear Roman: 

H < B R > 

H <BR>This is the eYardSign custom made for 
S- y o u . This 

C <BR>will give you a glimps of what we are 
doing. we 

<BR>also have other sites for citizens, wh 
ere they' may get involved 

<BR>in forums, chats, emails, etc. we als 
o , have 

<BR>ElectionShopp ing.com - where we sell c 
a m p a i g n 

<BR> goodies like banners, buttons, pens, 
t-shirts, etc.. 

< B R > 

<BR>Below this eYardSign are 5 links: Eac 
h link allows 

<BR> the voters and volunteer (any recipie 
n t ) 
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<BR> of an eYardsign to get involved by ei 
ther donating, 

<:BR> visiting the politicians headquarters 
, volunteering, 

<BR> sending the eYardsign to a friend., or 

simply polling a vote, 

< B R > 

<BR>By clicking on any of these icons, the 
results are tallied; 

<BR> this allows the users (campaign manag 
e r s and 

<BR> politicians) to see the actual result 
softheeYardSigns 

<BR> they sent out!! 

< B R > 

<BR>Please let me know what you think! 

< B R > 

<BR>Kesh patel 

B-R->'^E lectionMall .com 

< 8 R >'c o-founder...Your support and love mea 
n a great deal to melThis is my future pla 
ns Mom and DadGood afternoon Tabreez: 

< B R > 

<BR>This is the eYardsign custom made for 
you. This 

<BR>will give you a glimps of what we are 
doing. We 

<BR>al50 have site for citizens, where the 
y may get involved 

<BR>in forums, chats, emails. etc. We als 
o , have 

<BR>Elect ionShopping.com - where we sell c 
a m p a i g n 

<BR> goodies like banners, buttons, pens, 
t-shirts, etc.. 



< B R > 

<BR>Below this eYardsign are 5 links 
h link allows 



E a c 



<BR> the voters and volunteer (any recipie 
n t ) ^ 
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<BR> of an eYardSign to get involved by ei 
ther donating, 

<BR> visiting the politicians headquarters 
, volunteering, 

<BR> sending the eYardSign to a friend, or 
simply polling a vote. 
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(campaign manag 



check t h i 

s out, the latest in online politics, Comm 
unicate to your voters via email. E-campai 
gning just started to make cents!! have a 
fundraiser this week and would like you to 
come!Hey Paul, 

< B R > 

<BR>I just got off the phone with Jim and 
weore Doff and runningO. More news to com 
e . 

< B R > 

<BR>chris HohnHere is your personalized si 
g n , 

< B R > 

<BR>Chris HohnBe 
this DeyardsignD 
1 price, FREElBe 
this DeyardsignD 
1 price, FREElBe 
this DeyardsignD 
tical price, FRE£ 



a 


Hero! 


show 


you 


r 


a 1 


1 for 


the b 


est 


P 


a 


Hero! 


show 


you 


r 


a 1 


1 for 


the b 


est 


P 


a 


Hero! 


show 


you 


r 


a 1 


1 for 


the t 


h e 


b e 


! B 


e a H 


e r 0 I S 


how 


y 


g n 


D all 


for t 


h e 


b e 


! B 


e a H 


e r 0 ! S 


how 


y 




Page 90 









yardsign.mdb 

ber this oeyardsignD all for the best Po"li 



tical price, FREElBe a Hero! show you Memb 
er this DeyardsignD all for the best polit 
ical price, FREElDoes your campaign manage 
r know about this great campaigning tool? 
Find out more at Elect ionMall.comDear Baku 
1 3 0 s h i 



< B R > 

<BR>This is the eYardSign custom made for 
you. This 

<BR>will give you a glimps of what we are 
doing, we 

<BR>also have other sites for citizens, wh 
ere they may get involved 

<BR>in forums, chats, emails, etc. we als 
o , have 

<BR>ElectionShopp ing.com - where we sell c 
a m p a i g n 

<BR> goodies like banners, buttons, pens, 
t-shirts, etc.. 

< B R > 

_ < B-R->-B.e low this eYardSign are 5 links: Eac 
h lija^k allows 

<BR> the voters and volunteer (any recipie 
n t ) 

<BR> of an eYardSign to get involved by ei 

ther donating, 

<BR> visiting the politicians headquarters 
volunteering, 

<BR> sending the eYardSign to a friend, or 
simply polling a vote. 

< B R > 

<BR>By clicking on any of these icons, the 
results are tallied; 

<BR> this allows the users (campaign manag 
e r s and 

<BR> politicians) to see the actual result 
s of the eYardsigns 

<BR> they sent out!! 

< B R > 

<BR>Please let me know what you think! 



< B R > 
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<BR>Kesh Patel 
<BR>ElectionMall .com 

<BR>Co-founder. . . DDa LVAL D vD<DDa5D6Du 




:tionMali.comierei>ci, . 

<BR> HOW about this for a website! 

<BR>De5ign your own campaign material 
<BR> , .^.w« 



B R ^ 

<BR>Chris helped design the site; we can 
se it in the future. 
<BR>TedDear Dean Phillips: 



< B R > 



Vb R ijTa VI Singh asked me to send this eYard 
Sign 

<BR>out to YOU! Ravi looks forward to vis 
iting you this 

<BR>afternoon. My name is Kesh Rate! COO o 

f 

<BR>ElectionMall .com. 
< b R > 

<BR>This_ is the eYardSign custom made for 
you. This 

<BR>will give you a glimpse of what we are 
doing- We 

<BR>also have other sites for citizens, wh 
ere they may get 

<BR> involved 

<BR>in forums, chats, emails, etc. we als 
0 , have 

<BR>Elect ionshopping.com - where we sell c 
a m p a i g n 

<BR>goodies like banners, buttons, pens, t 
-shirts, etc.. 
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< B R > 

<BR>Below this eYardSign are 5 links: Eac 
h link allows 

<BR>the voters and volunteer (any recipien 
t ) 

<BR>of an eYardSign to get involved by eit 
her donating, 

<BR>vi siting the politicians headquarters, 
volunteering, 

<BR>sending the eYardSign to a friend, or 

simply polling a vote. 

< B R > 

<BR>By clicking on any of these icons, the 
results are tallied; 

<BR>this allows the users (campaign manage 
r s and 

<BR>politicians) to see the actual results 
of the eYardSigns 

<BR>they sent out!! 

< B R >^ 

<BR>Please let me know what you think! 

< B R > 

<BR>Kesh Patel 
<BR>ElectionMall .com 

<BR>Chief operating officer DDQD 0 7auD0 

$ 
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the latest in online politics. communica t e 

to vour voters via email. E-campaigning du 
st started to make cents!Hey! weare a loc 
al chicagoland startup. Check this out, th 
e latest in online politics. communicate t 

0 vour voters via email. E-campaigning ]us 
t started to make centslHey! we are a lo^a 

1 chicagoland startup. check this .out the 
latestin online politics. communicate to 

your voters via email. E-campaigning just 
started to make cents!Check this out the I 
atest in online politics. communicate to y 
our voters via email. E-Campaigning ]ust s 
tarted to make centsicheck this out the la 
test in online politics. Communicate to yo 
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ur voters via email. E-Campaigning just st 
anted to make centslDr. Cornfield: 




< B R > 

<BR>Let me know what you think. 

< B R > 

<BR>Kesh Patel 

<BR>ElectionMall .comFrank Quinn: 

< B R > 

<BR>Here is what an official evardsign loo 
>.s : -Vi Jc e ! 

<BR>^Makes you want to just run for preside 
n c y , 

<BR>huh? Below, you will find 5 links. T 
h e s e 

<BR>are the links that the recipients (vol 
u n t e e r s , 

<BR>voters, citizens..) would click on to 
show 

<BR>their support for the politician. I h 
ope this 

<BR>give5 a good idea what eYardSigns is a 
11 about. 

< B R > 

<BR>You will shortly be receiving an email 
from 

<BR>me about all of our sites. 

< B R > 

<BR>Thank you, 

< B R > 
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<BR>College of Law 

< B R > 

<BR>in partnership with 

< B R > 

<BR>Electionmall .com 

< B R > 

<BR>Would like to invite you 
<BR>to the first 
<BR>ECampaign seminar in 

< B R > c h i c a g o . 

< B R > 

<BR>4:30 □ 6:00 ECampaign 
<BR>semi nar 

< B R > 

<BR>6:00 D 9:00 social Hour 

< B R > 

<BR>Upstairs at MondayDs 
<BR>Restaurant 
<BR>203 North Lasalle 
<BR>Chicago, IL 

< B R > 

<BR>First door East of 
<BR>LaSalle street on Lake 
<BR>Street , 

< B R > 

<BR>Feel free to forward this 
<BR>invitation. 

< B R > 

< B R > R S V P to 
<BR>(773) 262-6525 

< B R > or 

<BR>RSVP@electionmall .com 
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Sorry guys im tes 
ting, this is the last oneSorry guys im te 
sting, this is the last oneSorry guys im t 
esting, this is the last oneSorry guys im 
testing, this is the last oneSorry guys im 

testing, this is the last oneSorry g u y s i m 
testing, this is the last oneMerrill ^ V ^ ^ 
h and Kent College of Law in partnership 

with Electionmall.com would like -to in 

vite you to the first ECampaign Sem i^n ar : -i 
n Chicago. 4:S0 a 6:00 ECampaign semina 

r 6:00 D 9:00 Social Hour August Slst 

<BR>upstairs at MondayDs Restaurant 203 N 
orth Lasalle Chicago First door East of 

Lasalle street on Lake street. Feel fre 

e to forward this invitation. 



<BR>RSVP to 
< B R > ( 7 7 S ) 



2 6 2 - 6 5 2 5 



< B R > / / 5 ) ^Oii-uji^j .^^ 

or RSVP@ELECTIONMALL.CO 

M Merrill Lynch and Kent college of Law 
in partnership with Electionmall.com w 

ould like to invite you to the first ECam 
paign Seminar in Chicago. 4:30 D 6:00 EC 

ampaign Seminar 6:00 D 9:00 social Hour 

August Slst 

<BR> upstairs at MondayDs Restaurant 203 N 
orth Lasalle Chicago First door East of 

Lasalle street on Lake Street, Feel fre 

e to forward this invitation. 



<BR>RSVP to 
< B R > ( 7 7 3 ) 



M 



\ R > i / / 5 ) 262-6525 

or RSVP@ELECTIONMALL.CO 

Help elect Claude Hutchison to be our re 
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n the 10th congressional Dis 



< B R > 

<BR>We are in a difficult race against a h 
ighly partisan incumbent who derives her s 
up port from inside the abeltwayD. 

< B R > 

<BR>Back home in the district we need to i 

ncrease peopleDs awareness of claudeDs mes 

sage. He is right for the district on all 

of the issues, he is from the district, an 

d he will truly represent the districtDs i 

nterests not just those of the party in wa 
shington. 

< B R > 

<BR>Pass this message along to your friend 
s and encourage them to learn more about C 
laude. Itas time to upgrade our represent 
ation in Washington. 

< B R > 

<BR>Thank you for your support. 

< B R > ^ 
<BR>-eCampaign Team ODD LVAL D ^nTD|DD*DRau ' — - - 

I 
I 

P 

UDbODDD 

□6D@ The future of the nation 1 

ies in the hands of the leaders we elect. 
By supporting GOP candidates Americans fut 
ure is secureMerrill Lynch and Kent 
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line politics. Communicate to your voters 
via email. E-Campaigning just started to m 
a k e centslsorry guys im testing, this is t 
he last onesorry guys im testing, this is 
the last onesorry guys im testing, this is 

the last onesorry guys im testing, this is 

the last onesorry guys im testing, this i 
s the last onesorry guys im testing, this 
is the last onesorry guys im testing, this 

is 

i s . _ , 
s is the last oneDDfD DDDQI 
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<BR>I spoke with someone at 
<BR>your campaign office and 
<BR>I tought that you may 
<BR>like this. 



< B R > 

<BR>Please forward this to 
<BR>your Tech or internet 

<BR>campaign staHelp yourself to this 
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<BR>Receive contributions for your campaig 
n on-line 24/7. 

<BR>Set up an account today through Electi 
onMall.com for free, the standard fee of $ 
99 will be waived by signing up today thro 
ugh us. 

<BR>You will be able to receive contributi 
ons within 48 hours when you take advantag 
e of this opportunity. 

<BR>The new age of campaigning is on-line, 
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Saturday, Sunday, Monday). we will be bli 
tzing a newsletter format piece as a kick- 
off to the post-Labor Day phase of the cam 
paign.This ^nur 

<BR>blitzing will require a great deal or 
manpower, but will not involve knocking on 

any doors or speaking to voters. Anyone i 
nterested can e-mail 

<BR>David From <davidfrom@hotmail.com> at 
the Kirk campaign HQ. 

<BR>we will meet this weekend at 10 AM at 
the Glenview office at 1910 waukegan Rd. 
I f t h i s ^ . 

<BR>time is not convenient, other times an 

d . ^ 

<BR>occasions can be accomodated. 

< B R > . , « ^ 
<BR>in addition, Mark Kirk and Cong. Porte 

r will be marching in the Buffalo Grove pa 
rade on Sunday, Sept. 3. Li n e - u p i s a t 1 2 
Noon at Bernard and Indian Hill Roads in B 
uffalo Grove (just east of Arlington Hts. 

%^b'r'^>"o n Monday, Sept. 4, Mark Kirk will mar 
ch in the zion jubilee Day Parade. Line-u 
p is at 12 Noon at the zion Leisure Center 
located at Shiloh Park, south of Rt. 173 
Line-up number is 17. we always need v 
olunteers to march in these parades in or 
der to show as much support as possible. 

<BR>Finally, we have begun consistent phon 
e banking out of our Glenview office T^"" 
hope to begin soon out of wheeling a |rd^--W:a-^- 
kegan sites. Phone banking will be from 5 
:30- 8:30 PM. The phoning will be underwa 
y for the duration of the campaign and is 
a rather volunteer intensive activity. 

■< B R > 

<BR> If you are interested in any of these 

activities, please call or e -^ni a i 1 o ^ a a 

<BR>David From at Kirk HQ at 847 - 7 24-8360. 

All and any assistance is greatly appre 
c i a t e d . 

< B R > 

<BR> Regards, 

^g^> DavidFrom DOA LVAL 

D DD8Dh 

"a'D"DbD"'DTDSDFDe 

vote for me 

<BR>and we will spend the che e s e P 1 e a s e I b 
eg of you to vote for mewwwwwhhhhhhhhnaaaa 
aaaassssssssssuuuuuuuuupppppppppppppiiiii'i 
i-i-ii-i-i_testingl23,sibuenosibuenosibuenosiP 

lease I beg of you to vote for mewwwwwhhhh 
hhhhhaaaaaaaassssssssssuuuuuuuuupppppppppp 
p p p i i i i i i i i i i i i - t e s t i n g 1 2 3 , s 1 b u e n o s 1 b u e n o s 

ibuenosiMr. Kau: 



< B R > 



Page 110 



yardsign.mdb 

<BR>Here is one of our 8 dot corns within E 
lectionMall.com with it patent pending eca 
mpaiqning solutions. We are the first in 
the industry to create this 2 way communic 
ation tool for campaign managers and polit 
icians, to communicate with their voters. 

< B R > 

<BR>We are going to revolutionize the way 
campaigning is done over the NET! 

< B R > 

<BR>PS - Look at the 5 links below.... 

< B R > 

<BR>Kesh Patel 
<BR>COO & co-founder 
<BR>510 610 7708 

<BR>electionmall.comWe appreciate your int 
erest and thank you for your attendance to 

the E-campaign seminar. you made "i^, ,^ succ 
essful event. Now it is time to work! 

<BR>Put your campaign On-Line! 

<BR>Receive contributions for your c a-m p a i g 
n o n - 1 i n e . 

<BR>Set up an account today through e c t i 

onwall.com free! The standard fee of $99 w 
ill be waived by signing up today through 
us, but donDt hesitate this is a one time 
offer ! 

<BR>You will be able to receive contributi 
ons within 48 hours when you take advantag 
e of this opportunity. 

<BR>The new age of Campaigning is on-line, 
ARE YOU? Jerry, use Electionmall.com to h 
elp get out the vote and raise money onlin 
e. conntact us at electionmall@yahoo.com 
or 773-262-6525Through the help of Electio 
nmall.com Nader can win. Contact election 
mall@yahoo.com or call 773 262 6525Throug,h 

the help of Electionmall.com Nader can w i n 
contact electionmall@yahoo.com or call 
773 262 6525Through the help of Electionma 
ll.com Nader can win. contact electionmal 
l@yahoo.com or call 773 262 6525lf you wan 
t Nader to get out his message use ^1?^^"^? 
nmall.com. contact us at electionmall@yah 
oo.com or call at 773 262 6525 Da"DLVAL D - 
~Dea€D:D 
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Here you go see if 
it finally worksPlease remeber to register 

and vote on November 7th. Hello Ray, your m 
essage goes here. You can also add links 
and urls here. is your campaign using the 

full benefits of E-Campaigning? is your ca 
mpaign On-Line? well no matter what the ca 
se is we can help. 

<BR>Receive contributions online in only 4 
08 hours. This can be done through Election 
ig M a 1 1 . c o m ! 

^ <BR>Sign up now and the one time fee of $9 
m 9 will be waived, but it will only be for 
ila limited time. so take advantage of this 
ijl great offer. 

^ <BR>Email me at gus@electionmall.com or st 
flop by our website at ElectionMall.com ^[jd 
i. click on to Fundraisingbynet.com. whar do 
riyou have to lose? Hey Kesh - 
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Support your Republican Attor 
ney General. Punch the ndonateD button on 

the bottom of this e-yardsign and make a d 
ifference in IL. Your donation of $1,000 
will be used to convince other voters^ -t h -a -t 

Jim Ryan is the best choice for IL attorne 
y general. January 25, 2000 
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<BR>candidates the Democrats 
<BR>have to offer. 

<BR> 4. woman candidates tend 

<BR>to have an, up to 5%, 
<BR>advantage at the polls. 
<BR> 5. The Repbulican 

<BR>candidate will have to 
<BR>raise at least 3-4 
<BR>million dollars. 

< B R > 

< B R > 

< B R > 

<BR>who is best beat Lauren 
<BR>Beth Gash? We are. 

< B R > 

<BR>Bio Stuff here 

< B R > : 

<BR>I am looking forward to 
<BR>meeting you answering 
<BR>your questions on the 
<BR>29th, at the wheeling 

<BR>HERE IS THE CUT OFF 
<BR> Towns hip Precinct 

< B R > DD< J □ @OODd 

n 

FD™Dt> 
N 

A ) fDaD2a{D-D6a^DVD DiDiav ^ 

a 30 a H0^2a6a(a y^Al Gore _ yhAl 

Goreyt)President 20003 U mm . w . n jp 

ybQus@electionmall.comyl3grfx/donkey.gifyNusic/spring.mid € o Y M K , 2 0 & 

2U D uaN>a6a@D _ yt>Dan the ManytDOan Patlakyt3President5 F 

@Di ybgus@electionmall.comyt3grfx/elephant.gify|3music/spring.mid. f p Z N L A 5 

( & yyoD ID 0 '-n!Y6a@ yjjpatrici ay[DVLASlSyt3Worth 

TownshipyJjState Representative - 36th District4 h @ai . . ^ , , u o n * 
ybvlasis2000@aol .comytDgrfx/el ephant.gif ybmLisic/antartica. mid, £0 | pnH»u& 
yyDD OD D E.A€u6a@ - yt^Dan the ManyfDdan the 

manytDElectionMall .com5 PD @Dm , u v, -r q r j? 

ybqus@electionmall .comyhgrfx/elephant.gifylDmusic/spnng.mido < x b y T B 5 C & 
/D D D0w-.T16a@ yh3oey|3Blowy[3repubsyfD3udge5 € 
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On Thursday, Sep 
tember 28, from 5-7:30 PM, weDre going to 
have a YP4W social event at The Hunt Club, 
1100 N. state St., Chicago. 

< B R > 

<BR>We had upwards of 200 people at our ki 



c 



koff at JillyDs and, with the 



<BR>election drawing nearer, we expect an 
even larger turnout this time. 

< B R > 
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<BR>This event will focus on Governor Bus 
Ds commitment to education. WeDre asking p 
eople to bring $10 worth of school supplie 
s, such as pencils and paper, as a cover c 
harge, which we will donate to local schoo 
Is. WeDll have 



<BR>state officials and representatives o 

volunteer groups on-hand to talk about ed 

ucation as well. 

<BR>On Thursday, September 28, from 5-7:3 

PM, weDre going to have a YP4W social eve 

nt at The Hunt club, 1100 N. State St., ch 
i c a g o . 



< B R > 



<BR>We had upwards of 200 people at our k 
ckoff at JillyDs and, with the 

<BR>election drawing nearer, we expect an 
even larger turnout this time. 



< B R > 



<BR>This event will 
Ds commitment to edu 
eople to bring $10 w 
s, such as pencils a 
harge, which we will 
Is. weDll have 

<BR>state officials 
V 0 1 unteer groups on 
ucation as well. 



<BR>we are going to 
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omization is also ava 
t price. You can reac 
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ne more effectively, 
o nMall.com and check 
ntact me at gus@elect 
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< B R > 

<BR>First off we will beat AristotleDs per 
centage for online fund-raising. 

<BR>secondly we have the ability to raise 
money in the old fashioned way, in that th 
e donor must go to the individual candidat 
e or committee site to donate. what we do 

is, through email, send the site tothedo 
nor. AS you can see at the bottom of— this 

Eyardsign you can donate directly to-^ C-C-R G c 
Added to the ability to donate you will 

be able to track where and by whom the ema 
ils are forwarded, collect volunteers, Plu 
s, Minus, zero with the DvoteD button and 
visit CCRCCDs home page directly from you 
email . 



< B R > 

<BR>we can also manage sending out your em 
ails and creating a customized Eyardsign. 

< B R > 

<BR>Let set up a meeting with Lisa and Man 
ny, any time, sooner the better. 



< B R > 



<BR>Yours , 



< B R > 



< B R > 

<BR>Christopher A. Hohn 
<BR>Chris@electionmall .com 
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< B R > 

< B R > P , S . 

<BR>Go ahead and test all the buttons, we 
will be able to set all of the links DDBD3 

D RD 



D 4n D "DCpcoMD ybRayy[3Longyl3TribuneylDU.S. Senators aq @Dm 

y|3jesse@electionmall -comyl^grfx/capitol .gifytDmusic/antartica.mid* € n v J H : 1 + 
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□ DDD @€ ana'DD ®€ ODDOD @€ OnDDD ®€ DDODD @€ DDDDD 
@€ DDDDD @€ DDDDD @€ DDDDD @€ DDDDD @€ DDDDD (&€ DDDDD @€ DDDDD @€ 
@€ DDDDD DDDDD @€ DDDDD @€ DDDDD @€ DDDDD @€ DDDDD DDDDD ®€ 
@€ DDDDD DDDDD @€ DDDDD @€ DDDDD @€ DDDDD @€ DDDDD @€ DDDDD @€ 



D€ D L D€ 



D LDD€ D LDD€ LDD€ 

LDD€ D LDD€ # LDO€ $ LDD€ 
D€ " LDD€ + LaD€ , L 



% LDD€ & L 
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D€ 1 LDD€ 2 LDn€ 3 LDDC 4 LODC 5 LDO€ 6 LDD€ 7 LaD€ 8 LDD€ 9 Q □€ 
: QDO€ ; QDD€ < QDDC = QDD€ > QDO€ ? QUU€ @ QDDC A QQD€ B Q D€ 
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ADOUTILS.ASP 
<SCRIPT RUNAT=SERVER Language^" JavaScri pt"> 

y ^ ^- Jf JL J* J-- JU JU ^. ^. ^ ^ ^ ^- J; 

// Microsoft Scripting Library 

// ADO conversion utilities for extracting data on the server. 
// copyright 1998 Microsoft Corporation. All Rights Reserved. 

// function RecordSetAsArray(rsADO,inc1udeHeaderRow) 
// A helper function to convert an ADO recordset into a 
// jscript array. Optionally may include the field names 

// as the first row of the array by setting includeHeaderRow 
// parameter to true. 

^ y a. j;. ^ ^ ^ Jf * ^ ^ JL. 

f uncti on RecordSetAsArray (rsADO, i ncl udeHeaderRow) 
{ 

var rsArray = new Array; 

var nFields = rsADO. Fields. Count ; 

if (nFields) 

var n = 0; 

if (includeHeaderRow) 

{ // include first row as header of field names 

var rsRow = new Array(nFields) ; 
for (var i=0; i < nFields; i++) 

rsRow[i] = rsAD0(i).name; 
rsArray[n++l = rsRow; 

} 

while (IrsADO.EOF) 

{ // add each record to array 

rsRow = new Array(nFields) ; 

for (var i=0; i < nFields; i++) 

rsRow[i] = rsADO(i) .value; 

rsArray[n++] = rsRow; 

r sADO . MoveNext () ; 

} 

} 

return rsArray; 

} 

// function RecordsetAsDSO(rsADO) 

// "A helper function to convert an ADO recordset into an 
// HTML Data Source Object (DSD). This function creates 

// an HTML table where the <td> cells are identified (id) 

// as the corresponsing ADO field names, and the <TD> cell 

// contents contain the ADO field values. 

// The return value is a string containing the HTML DSC. 

function RecordsetAsDSO(rsADO) 

var htmlDSO = " ; 

var nFields = rsADO, Fields. Count; 

if (nFields) 

var n = 0; 

htmlDSO + 'table>\n'; 

while (IrsADO.EOF) 
{ // add each record to table 
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htmlDSO += + 'tr>' ; 
for (var i=0; i < nFields; 

^ htmlDSO += + 'td id=' + rsADO(i) .name + + 

rsADOCi). value + + Vtd>'; 

htmlDSO += + 7tr>\n'; 
rsADO.MoveNextC) ; 

htmlDSO += + Vtable>'; 

return htmlDSO; 

} 

// function RecordsetAsList(rsADO, field) 

// A helper function to convert an ADO recordset into a 
// iscript array. The field parameter identifies which 

// field to put into the list. The field paramter can be 

// either a field index or a field name. 

f uncti on RecordSetAsLi st (rsADO, f i el d) 

^ var rsArray = new Array; 

var nFields = rsADO. Fields. Count ; 

if (nFields) 

{ 

var n = 0; 

while (IrsADO.EOF) ^ , , , 

{ // add each value of field into array 

— rsArray[n++] = rsAD0(fi eld) .value; 

rsADO.MoveNextO ; 

} 

} 

return rsArray; 

} 

// function RecordAsObiect(rsADO,objectName) . 
// A helper function to convert an ADO record into a iscript 

// object. The field names of the record will be used as the 

// object property names, and the data as the object values. 
// optionally may indicate the name of the object constructor 

// to be returned, defaults is 'RSObject'. 

f uncti on RecordAsOb j ect (rsADO , ob j ectName) 

^ if (typeofCobj ectName) == 'undefined') 

obj ectName = 'RSObject'; , ^^ r . 

var strobject = 'function ^ + objectName + O 1 ; 
var nFields = rsADO. Fields. Count; 
if (IrsADO.EOF) 

^ var value = new string; 

var propName = new String; 

for (var i=0; i < nFields; i++) 

propName = rsADO(i) .name; 

var cO = propName. charAt(O) ; , , oo 

if ((propName. indexOfC ') == -1) && ((cO >= 'A' && cO < 
'z') 1 I (cO >= 'a' && cO <= 'z'))) 
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{ // exclude fields that are invalid variable names 

value = rsADO(i) .value; 
if CisNaN(parseFloat(value))) 

strobject += 'this.' + propName +'="'+ 

value + 

else 

strobject += 'this.' + propName + ' + 

value + ' ; ' ; 

} 

strobject += ; 
eval (strobject) ; 

return eval ('new ' + objectName); 



</SCRIPT> 
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<SCRIPT RUNAT=SERVER LANGUAGE="3avaScri pt"> 

// Microsoft Script Library 

// Visual interDev 6.0 Button object for ASP 

// copyright 1998 Microsoft Corporation. All Rights Reserved. 

f uncti on CreateButton (st rName , f uncini t , ob j Parent) 

if (typeof (strName) == 'string' && strName != 

var objButton = new „Button(strName) ; 
eval (strName + ' = objButton;'); 
objButton. _funcinit = funclnit; 

thisPage.advise(PAGE„ONlNlT, StrName + ' ._restoreState() ') ; 
return objButton; 

return null ; 

} 

function _Button (strName) 

^ if (typeof (^bBTNPrototypeCalled) == 'undefined') 
„BTN Prototype () ; 

// public members 
this. id = StrName; 
this. name = strName; 

// advise for default eventhandlers 

.-this.„objEventManager = CreateEventManagerO ; 

Xhl s ._obj EventManager . advi seDef aul tHandl er (thi s . name , BTN_0NCLICK) ; 

} 

function „BTN Prototype () 

_bBTNPrototypeCalled = 1; 
// events 

BTN.ONCLICK = 'onclick'; 
// constants 
BTN_TEXT = 0; 
BTN_IMAGE = 1; 

// public members 

„Button. prototype. disabled = false; 

_Button. prototype. value = ''; 

^Button. prototype. src = ''; 

_Button. prototype. alt = ''; 

_Button. prototype. maintainState = true; 

// private members 

.Button. prototype. _nstyle = BTN^TEXT; 
_Button. prototype. _bvi si ble = true; 

// public methods 

„Button. prototype. isvi si ble = „BTN_isVisible; 
^Button. prototype. show = _BTN_show; 
„Button. prototype. hide = _BTN_hide; 
_Button. prototype, setstyle = „BTN_setStyle; 
_Button. prototype. getstyle = _BTN„getStyle; 
_Button. prototype. advise = _BTN_advise; 
_Button. prototype. unadvise = _BTN„unadvise; 
^Button. prototype. display = _BTN_di splay; 
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// private methods 

_Button. prototype. _fireEvent = _EM fireEvent; 

_Button. prototype. „preservestate = _BTN preserveState; 

.Button. prototype. „restoreState = _BTN restorestate; 

_Button.prototype._hasState = „BTN hasState; 

//scope implementation to _BTN Prototype function 

function _BTN„isvisible() 

{ return this._bvisible; } 

function _BTN_show() 

{ this._bvisible = true; } 

function _BTN„hideO 

{ this._bvisible = false; } 

function _BTN_setStyle(nStyle) 
{ this._nstyle = nstyle; } 

function _BTN„getStyle(nStyle) 
{ return this._nStyle; } 

function „BTN_advise(str Event, funcToCall) 

{ return this. _objEventManager.advise(strEvent, funcToCall); } 

function _BTN_unadvi se (str Event , nAdviselD) 

{ return this._objEventManager.unadvise(strEvent,nAdviselD) ; } 

- ' ^ ^"fufiction _BTN„displayO 

if Cthis-_bvisible) 
{ 

var strHTML; 

if (this. disabled && this._nstyle == BTN_TEXT && 

! thi sPage . i sDHTMLBrowser ()) 

{ // mimic disabled button on non-DHTML browsers 

StrHTML = '<TABLE border=2 bgcolor=:#cOCOcO 
bordercolor=#808080 bordercolordark=#696969 bordercolorlight=#COCOcO cellpadding^O 
cellspacing=0>' 

StrHTML += '<TR><TD><FONT 

color=#696969>   • + this. value + '  </FONT></TD></TR></TABLE>* 

else if Cthis._nstyle == BTNJMAGE && 
! thi sPage . i sDHTMLBrowser ()) 

{ // use image tag on non-DHTML browsers 

StrHTML = ^<IMAGE border=0 name='" + this. name + ' 
id="' + this. id + src="' + this.src + 

if (this. alt != ") 

StrHTML += ' alt="' + this. alt + ; 
StrHTML += ; 
if (! this. disabled && 

this. _ob j EventManager . get Eventcount () && 
this. _ob j EventManager . get Event (0) 

BTN^ONCLICK) , . , 

{ // use anchor tag to support onclick on 

non -DHTML browsers 

var strHandler = 

thi s ._ob j EventManager . generated i entHandl er (thi s . name , btn„ONCLICK) ; 

StrHTML = '<A href="javascript: ' + 

StrHandler + + strHTML + '</A>'; 

} 
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} 

el se 

^ if (this._nstyle == btn_image) 

^ strHTML = '<■ + 'INPUT border=0 type=image 

name="' + this. name + id=" + this. id + src="' + this.src + ; 

if (this. alt != ) , . n 

StrHTML += ■ alt="' + this. alt + 

} 

else , „, 

StrHTML = + 'INPUT type=button name= + 
this. name + id-"' + this. id + value="' + server. HTMLEncodeCthis. value) + 

if (! this. disabled) , 
{ // output client events to callback to 

server 

var strHandler = 

this. obiEventManager.generateClientHandlers(this.name) ; 

" StrHTML += StrHandler; 

} 

else ^ 

StrHTML += ' disabled ; 

StrHTML += '>\n' ; 

Response. write(strHTML) ; 

thi s .„preserveState() ; 

function _BTN preserveStateQ 

^ if (this.maintainState) 

^ var state = new object; 

if (!this._bvisible) 

state._bvisible = false; 
if Cthis._nstyle != btn_text) 

state. _nstyle = this._nstyle; 
if (this. disabled) 

state. disabled = true; 
state. value = this. value; 
if (this.src != ") 

state. src = this.src; 
if (this. alt != ") 

state. alt = this. alt; 
return thi sPage . persi ststate(thi s . name , state) ; 

return false; 

} 

function _BTN restoreStateO 

^ thi s ._f i reEvent (thi s ._f uncini t) ; 

if (this.maintainState) 

^ var state = thi sPage.unpersistState(this. name) ; 

if (state != null) 

^ if (state. _bvi si ble != null) . . . 

this._bvisible = (state. _bvi si ble != '0' && 
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State. _bvi si ble != 'false') 



state.disabled != 'false'); 



} 



^ } 
return false; 



else 



this._bvisible = true; 



if (state. _nstyle != null) 

this._nstyle = istumber (state. „nstyl e) ; 

else 

this._nstyle = BTN_TEXT; 

if (state.disabled != null) 

this. disabled = (state.disabled != '0' && 



else 



this. disabled = false; 



if (state. value != null) 

this. value = state. value; 

else 

this. value = ' ' ; 

if (state. src != null) 

this.src = state. src; 

else 

this.src = * ' ; 

if (state. alt != null) 

this. alt = state. alt; 

else 

this. alt = " ; 
return true; 



function _BTN hasStateO 

if (this.maintainstate) 

return thi sPage . i sStatePersi sted (thi s . name) ; 
return false; 

} 

} // end of _BTN Prototype function 

</SCRIPT> 
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II Microsoft Script Library<BR> 

// visual interDev 6.0 Button Object for dhtml<br> 

// copyright 1998 Microsoft Corporation. All Rights Reserved. <br> 

// <B>Do not modify in design view. Switch to source view.</B><BR> 

II ^ if if if it if if if if if it it it if it it it -it it if* -If 'if 

II <5CRIPT> ^ ^ 

f uncti on CreateButton (st rName , f uncini t , ob j ParentEl em) 

^ if (typeof (strName) != 'string' |1 strName == ") 

return null ; 

var strTag = '<SPAN id="' + strName + '„span">'; 

strTag = strTag + '<input type=button name= + strName + ia= + st 

+ '%'; 

StrTag = strTag + '</SPAN>' 

if C(typeof(obj ParentEl em) == 'object') && (obj ParentEl em != null)) 
ob j ParentEl em . i nsertAd j acentHTMLC ' Bef oreEnd ' , strTag) ; 

else 

document, write (strTag) ; 
//append public members 

var objButton = _BTN createMembers (strName) ; 

if ((typeof (obj Button) != 'object') M (objButton == null)) 
return null ; 

// events 

BTN_0NCLICK = 'onclick'; 
// constants 

, : - '-BTJ^_TEXT = 0; 

-BTN„IMAGE = 1; 

//private members 

objButton, ^objEventManager = null; 

obj Button. _nstyle = BTN^TEXT; 

// advise for default eventhandlers 

obj Button. _objEventManager = CreateEventManagerO ; 

objButton._fi reEvent('„BTN onbeforefuncinitC + obj Button. id + ) ); 

obj Button . „f i reEvent (f uncini t) ; 
return objButton; 

} 

function „BTN createMembers (strName) 

^ var objParentspan = document. all [strName + '_SPAN']; 

var objButton = objParentSpan.children(O) ; 
if (typeof (objButton) != 'object') 
return null ; 

// ensure strName is defined in global namespace 

var bDefineAsGlobal = eval ('typeof (' + strName + ') -= undefined ) 

typeof (objParentspan. „makeglobal) != 'undefined'; 
if (bDefineAsGlobal) 

{ // scoped within a form, define in global namespace 

eval (strName + ' = objButton'); 
objParentSpan.„makeglobal = 1; 

} 

objButton. isvi si ble = _BTN„is Visible; 
objButton. show = _BTN„show; 
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obj Button. hide = _BTN_hide; 
obqButton.setStyle = „BTN_setStyle; 
obj Button, getstyle = _BTN_.getstyle; 
obj Button. advise = _BTN_advise; 

obq Button. adviseoefaultHandler = _BTN_adviseDefaultHandler; 
objButton.unadvise = „BTN_unadvise; 
obj Button. display = _BTN„di splay; 

obj Button. _f i reEvent = „BTN fireEvent; 

objButton._objSpan = eval (strName + *„SPAN'); 
return obj Button; 

} 

function _BTN_isVisibleO 

{ return (this. style. visibility != 'hidden'); } 

function „BTN_show() 

{ this. styl e . vi si bi 1 i ty = ' vi si bl e ' ; } 

function „BTN_„hideO 

{ this. style. visibility = 'hidden'; } 

function _BTN„setstyleCnStyle) 

^ if (!isNaNCparselnt(nStyle)) && nStyle != this._nStyle) 

// type of tag needs to be changed 
// save current state 
var bvisible = this.isVisibleC) ; 
var bDisabled = this. disabled; 
var objEventManager = this,_objEventManager; 
var St rvalue = ; 
^ var strsrc = ' ' ; 

var strait = ' ' ; 

if ((this. value + ") != 'undefined') 

st rvalue ^ this. value; 
if ((this.src + ") != 'undefined') 

strsrc = this.src; 
if ((this. alt + ") != 'undefined') 

strait = this. alt; 

// replace previous tag with new tag 
var strTag = '<input type='; 
if (nStyle == 0) 

StrTag += 'button ' ; 

else 

StrTag += 'image alt=:'" + strait + '" '; 
StrTag += 'name="' + this. name + '" id="' + this. id + 
styl e="vi si bi 1 i ty : hi dden"> ' ; 

this._objspan.innerHTML = strTag; 

//append public members 

var objButton = _BTN createMembers(thi s . name) ; 

if ((typeof (obj Button) != 'object') M (objButton == null)) 
return null ; 

objButton. value = strvalue; 
objButton -src = strsrc; 
objButton. alt = strait; 
obj Button, disabled = bDisabled; 
if (bvisible) objButton. showQ ; 
obj Button. _objEventManager = objEventManager; 
if (objEventManager != null) 
{ //re-attach all event handlers 
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var nEvents = objEventManager.getEventCountO ; 
for (van i=0; i < nEvents; 1++) 

eval ('obj Button, ' + objEventManager.getEvent(i) + 

= „BTN_fireEvent; '); 

} 

obj Button. _nstyle = nstyle; 
return true; 

} 

return false; 

} 

function „BTN_getSty1e(nStyle) 
{ return this._nStyle; } 

f uncti on _BTN_advi se(st rEvent , f uncToCal 1 ) 

^ var nAdviselD = thi s._objEventManager.advise(st rEvent, f uncToCall ) ; 
if (nAdviselD != -1) _ ^ 

evalC'this.' + st rEvent + ' = „BTN fireEvent; ') ; 

return nAdviselD; 

} 

function _BTN_adviseDefaultHandler(strName,st rEvent) 

^ var nAdviselD = this._objEventManager.adviseDefaultHandler(strName,strEvent) ; 
if (nAdviselD != -1) 

evaK'this.' + st rEvent + ' = _btn fireEvent; ); 

} 

.f unction- _BTN_unadvise(st rEvent, nAdviselD) 

^ return thi s ._obj EventManager . unadvi se(st rEvent , nAdvi selD) ; 
} 

function _BTN_displayC) 
{ } 

function „BTN fi reEventCfuncToFi re) 

^ if (typeof (f uncToFi re) == 'undefined') 

^ if (thi s._obj EventManager != null) 

this._objEventManager.fi reEventC on' + wi ndow. event .type) ; 

if (this._nstyle 0) 
return true; 

else 

return false; 

} 

else 

_EM fi reEvent(funcToFi re) ; 

} 

function _BTN onbeforef unci nit (obj Button) 

{ obj Button. adviseDefaultHandler (obj Button. id, BTN_ONCLICK) ; } 
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<SCRIPT RUNAT=SERVER LANGUAGE^" JavaScri pt"> 

II Microsoft Script Library 

// Visual interDev 6.0 checkbox Object for ASP 

// copyright 1998 Microsoft Corporation. All Rights Reserved. 

f uncti on CreateCheckbox (st rName , f uncini t , ob j Parent) 

if (typeof (strName) == 'string' && strName != ") 

var objcheckbox = new .Checkbox (st rName) ; 
eval (strName + " = objcheckbox"); 
objcheckbox. _funclnit = funclnit; 

thi sPage. advise (PAGE_0NINIT, StrName + * ._restoreState() ); 
return objcheckbox; 
return null ; 

} 

function _Checkbox(st rName) 

^ if (typeof („bCHKPrototypeCal led) == 'undefined') 
_CHK Prototype 0 ; 

// public members 
this. id = StrName; 
this. name = strName; 
this. value = strName; 

^/ private members 

this._objEventManager = createEventManaqerO ; 

thi s . _ob j EventManager . advi seDef aul tHandl er (thi s . name , CHK_0NCLICK) ; 

} 

function „CHK PrototypeO 

_bCHKPrototypeCalled = 1; 
//events 

CHK.0NCLICK = 'onclick'; 
//public members 

^Checkbox. prototype. disabled = false; 
„Checkbox. prototype. maintainstate = true; 

// private members 

.checkbox. prototype. _bvi si ble = true; 
.Checkbox. prototype. _strCapti on = ''; 
.Checkbox. prototype. .checked = false; 
.checkbox. prototype. .objDataSource = null; 
.Checkbox, prototype.. St roataFi eld = "; 

//public methods 

.Checkbox. prototype.isvi si ble = „CHK.isVisible; 
.checkbox, prototype. show = .CHK.show; 
.Checkbox. prototype. hide = .CHK.hide; 
.Checkbox. prototype. getchecked = .CHK.getChecked; 
.Checkbox. prototype. setchecked = .CHK.setChecked; 
.Checkbox. prototype. getcapt ion = .CHiegetcapti on ; 
.checkbox. prototype. setcapti on = _CHK_setCaption; 
.checkbox. prototype. getDataSource = .SOM^getDataSou rce; 
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.Checkbox, prototype. setDataSource = _sOM_,setDataSource; 
_„Checkbox.prototype.getDataField = _S0M_getDataField; 
.Checkbox. prototype. setDataFi eld = _SOM_setDataField; 
.Checkbox. prototype. advise = _CHK„advi5e; 
.checkbox. prototype. unadvise = _CHK_unadvi se ; 
.Checkbox. prototype. display = _CHK_di splay; 

//private methods 

.checkbox. prototype. „fireEvent = _EM fireEvent; 

.Checkbox. prototype. _preservestate = _CHK preservestate; 

.Checkbox. prototype. _restoreState = _CHK restorestate; 

.checkbox. prototype. _hasstate = _CHK hasstate; 

.Checkbox. prototype. _onrowenter = _CHK onrowenter; 

^Checkbox. prototype. _onbeforeupdate = _CHK onbeforeupdate; 

//scope implementation in „CHK_Prototype function 

function „CHK_isvisibleO 

{ return this._bvisible; } 

function _CH[e.show() 

{ this._bvisible = true; } 

function „CHK_hide() 

{ this-_bvisible = false; } 

function _CHK_getCaption() 

{ return thi s .„strCaption ; } 

f uncti on _CHK_setCapt i on (st rCapti on) 

4. this._strCaption = strCaption; } 

function _CHK_getcheckedO 

{ return this._checked; } 

function „CHK_setChecked (value) . , ^ . 

{ this. .checked = (value != 'false' && value != '0' && value != "); 

function _CHK_advi se (str Event ,funcToCall) 

{ return this._objEventManager.advise(strEvent,funcToCall) ; } 

function _CHK_unadvi se (str Event ,nAdviselD) . . ^ 

{ return this._objEventivianager.unadvise(strEvent,nAdviselD) ; } 

function _CHK_display() 

if (this._bvisible) 
{ 

var strHMTL; 

if (this. disabled && ! thisPage.isDHTMLBrowserO) 
{ // mimic disabled for non-DHTML browsers 

strHTML = '<FOfMT face=arial color=#808080><b>[' ; 

if (this._checked) 

StrHTML += '<FONT si ze=2>x</F0NT> ' ; 

else 

StrHTML += '   ' ; 
StrHTML += •]</b></FONT>  ' + this._strCaption + 



} 

else 
{ 
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strHTML = + 'INPUT id="' + this. name + 
name="' + this. name + value="' + this. value + type="checkbox'" ; 

if (this._checked) 

StrHTML += ' checked' ; 
if (! this. disabled) 

{ // output client events to callback to 

server 

var strHandler = 

thi s ._obj EventManager , generated i entHandl ers (thi s . name) ; 

StrHTML += StrHandler; 

} 

else 

StrHTML += ' disabled=true' ; 
StrHTML += 'x' + 'LABEL f or=" ' + this. name + '" 

htmlfor-'" + this.id + 

if (this. disabled) 

StrHTML += ' disabled=true' ; 
StrHTML += '>' + this._strCaption + '</LABEL>\n' ; 

Response. write (strHTML) ; 

return this._preservestate() ; 

} 

function „CHK preserveStateO 

if (this.maintainState) 
{ // preserve state in hidden field 

/ - : - ^ var state = new object; 

^ if (!this._bvisible) 

state.„bvisible = false; 
if (this. disabled) 

state. disabled = true; 
if (this._checked) 

state. _checked = true; 
state. ..strcapti on = this.^strcaption; 
if (this. value != this. name) 

state, value = this. value; 
return thisPage.persistState(thi s. name, state) ; 

return false; 

} 

function _CHK restoreStateO 

var r = false; 

thi s ._f i reEvent (thi s .„f uncini t) ; 
if (this.maintainState) 

^ var state = thi sPage.unpersistState(this. name) ; 

if (state i= null) 

if (state. „bvi si ble != null) 

this.„bvisible = (state. _bvi si ble != '0' && 

state. _bvi si ble != 'false'); 

else 

this._bvisible = true; 

if (state.disabled != null) 

this. disabled = (state.disabled != '0' && 

state.disabled != 'false'); 
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else 

this, disabled = false; 
if (state. _checked != null) 

this. .checked = (state. .checked != '0' && 

else 

this. .checked = false; 

if (state.. St rcaption != null) 

this-.strcaption = state. .strCapti on; 

else 

this-.strcaption = 

if (state. value !^ null) 

this. value = state. value; 

else 

this. value = this. name; 
r == true; 



} 



} 



if (this..bvisible) 

{ // reflect current state returned m thisForm 

var newValue = Request. Form(this. name) + ''; 
if (newValue != 'undefined' && newvalue == this. value) 

thi s . setchecked(true) ; 
else if (this.„hasstate()) 

thi s.setchecked (false) ; 

} 

return r; 



function .CHK hasStateO 

if (this.maintainstate) . 

retu rn thi sPage . i sStatePersi sted (thi s . name) ; 
return false; 

} 

// eventhandler for databinding , 

f uncti on .CHK onrowenter (ob j Recordset , strDataFi el d) 

^ thi s . setchecked (ob j Recordset . f i el ds . getval ue (strDataFi eld)); 

} 

// eventhandler for databinding . 

f uncti on „CHK onbef oreupdate(ob j Recordset , strDataFi el d) 

^ var chkvalue = this .getCheckedO ; 

if (typeof (chkvalue) != 'undefined' && chkvalue != null) 

ob j Recordset . f i el ds . setval ue (strDataFi el d , ch kval ue) ; 

} 

} // end of .CHK Prototype function 

</SCRIPT> 
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II ic -k -it -ic ic ic ii -it -it -if -it -k -it -k ic i( i{ ic if -if ic -it it it ic i( ic it -k ie it it -k -ft it it -ft ^ 

// Microsoft Script Library<BR> 

// visual interDev 6.0 Checkbox Object for DHTML<br> 

// copyright 1998 Microsoft corporation. All Rights Reserved. <BR> 

// <B>Do not modify in design view. Switch to source view.</B><BR> 

1 1 i{i:ifiiici(iti:'kiti<i(-kiti('l:itici(ititiii:ititititi:-kici(iti(itiriiiticititi:iiiti<iriiiiifitititiiit^ 

// <SCRIPT> 

f uncti on CreateCheckbox(st rName , f uncini t , obj Parent) 

if (typeof (strName) != 'string' M strName 
return nul 1 ; 

var strTag = + 'input TYPE="checkbox" id="' + strName + name=" ' + 
StrName + " V ; 

StrTag += '<' + 'LABEL id="' + strName + '_LBL" name="' + strName + '_LBL" 
for='" + StrName + '" htm1for="' + strName + '"></LABEL>'; 

if ((typeof (obj Parent) == 'object') && (obj Parent != null)) 
obj Parent . i nsertAd jacentHTML ( ' Bef oreEnd ' , strTag) ; 

else 

document .write (strTag) ; 

var objcheckbox = document .all [strName] ; 
if (typeof (objcheckbox) != 'object') 
return null ; 

var bNameExists = eval ('typeof (' + strName + ') == "object"'); 
if (! bNameExists) 

eval (strName + ' = objcheckbox'); 

//events 

/ - : - '^CHK_0NCLICK = 'onclick'; 
//intrinsic properties 

// name AND id RO 

// disabled RW 

// value RW 

//public methods 
objcheckbox. hide = _CHK„hide; 
objcheckbox. show = _CHK_show; 
obj checkbox, isvi si ble = _CHK„is visible; 
objcheckbox, getChecked = _CHK_getChecked; 
objcheckbox. setchecked = _CHK_setChecked; 
obj checkbox. getcapti on = _CHK_getCaption ; 
objcheckbox. setcapti on = „CHK_setCaption; 
objcheckbox. getDataSource = _CHK_getDataSource; 
objcheckbox. setDataSource = _CHK_setDataSource; 
obj checkbox. getDataFi eld = _CHK_getDataField; 
objcheckbox. setDataFi eld = _CHK_setDataField; 
objcheckbox. advise = _CHK_advise; 

objcheckbox. adviseoefaultHandler = „CHK_adviseDefaultHandler ; 
objcheckbox. unadvise = _.CHK„unadvise; 
objcheckbox. display = _CHK„di splay; 

//private members 

objcheckbox. „objDataSource = null; 

objCheckbox.^strDataField = ''; 

objcheckbox. _obj Label = eval (objcheckbox. name + '_lbl'); 
objCheckbox._fireEvent = „CHK fireEvent; 

// advise for default eventhandlers 

objcheckbox, _objEventManager = CreateEventManagerO ; 

objCheckbox._fireEvent('_CHK onbeforefuncinitC + objcheckbox. id + ')'); 
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objCheckbox.„fi reEvent(funclnit) ; 
return objcheckbox; 



function _CHK_isVisibleO 

{ return (this. style. visibility != 'hidden'); } 

function _CH[C_hide() 

this. style. visibility = 'hidden'; 
this._objLabel .style. vi Sibil ity = 'hidden'; 

} 

function _CHK_show() 

thi s . styl e . vi si bi 1 i ty = 'visible'; 
this._objLabel .style. vi Sibil ity = 'visible'; 

} 

function _CHK„getCaptionO 

{ return thi s._obj Label .innerHTML; } 

f uncti on _CHK_setcapti on (st rCapti on) 

{ thi s.^obj Label -innerHTML = strCaption; } 

function „CHK_getChecked() 

{ return this. checked; } 

function _CHK_setChecked (value) 

{ this. checked = (value != 'false' && value != '0' && value != "); } 

function-^CHK_getDataSource() 

{ return this._objDataSource; } 

f uncti on _CHK_set DataSou r ce (ob j DataSou r ce) 

if (typeof(obj DataSou rce) != 'object') 
return false; 

if ((this._objDataSource != null) && (this._strDataField != ")) 

if (t hi s . „ob j DataSou rce . i sDHTMLAware () ) 

thi s ._objDataSource . unadvi se(thi s ._beforeUpdatelD) ; 
this.datasrc = " ; 
this.dataFld = " ; 

} 

else 

thi s -_obj DataSou rce . unadvi se(thi s ._rowEnterlD) ; 
thi s ._obj DataSou rce . unadvi se(thi s ._rowExi tiD) ; 

} 

} 

if ( (thi s.„obj DataSou rce == null) || (objDataSource != null && 
this._objDataSource.id != objDataSource. id)) 

if (this._objDataSource != null) 

thi s ..ObjDataSource . unadvi se(thi s ._af terOpeniD) ; 

this._afterOpenlD = ob j DataSou rce. advi se(RS_ONAFTEROPEN, this. id + 
■ .setDataSourceC + objDataSource. id + ');'); 
} 
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this._objDataSource = obiDatasource; 

if (CobjDataSource != null) && Cthis._strDataField !== ")) 

^ if CobjDataSource. isDHTMLAwareO) 

this._beforeUpdatelD = - ^ ^ 

obiDatasource. adviseCRS.ONBEFOREUPDATE, '_CHK onbeforeupdateC + this. name + ); ); 

this.datasrc = + objDataSource.getDHTMLDataSourcelDQ ; 
this.dataFld = this._strDataField; 

} 

else 

^ this._rowEnterlD = objDataSource.advise(RS_ONROWENTER, 

•_CHK onrowenterC + objDataSource,getlD() + ' + this. name 

this.„strDataField + '");'); . . , 

this._rowExitlD = objDataSource.advi se(RS_ONROWEXlT, 

'_CHK_.onrowexitC + obiDataSource.getlDQ + ' + this. name +',"' + 

this-„strDataField + "^^);'); 

} 

} 

return true; 

} 

function _CHK_getDataFieldO 

{ return this._strDataField; } 

f uncti on _CHK_setDataFi el d (st rDataFi el d) 

^ if ((this._objDataSource !== null) && (this._st rDataFi eld != ")) 

if Cthis._objDataSource. isDHTMLAwareO) 

^ thi s .„objDataSource . unadvi se(thi s .__beforeUpdateiD) ; 

this.datasrc = ' ' ; 
this.dataFld = " ; 



} 



} 

else 
{ 



} 



thi s ._objDataSource . unadvi seCthi s ._rowEnteriD) ; 
thi s ._objDataSource . unadvi seCthi s ._rowExi tID) ; 



this._strDataField = strDataField; .... ..^^ 

if (Cthis._objDataSource != null) && (this._strDataFTeld != )) 

^ if (thi s._objDataSource. isDHTMLAwareO) 

this.„beforeUpdatelD = 
this._objDataSource.adviseCRS„ONBEFOREUPDATE, '_CHK_onbeforeupdate(' + this. name + 

this.datasrc = + 
this._objDataSource.getDHTMLDataSourcelDO ; 

this.dataFld = strDataField; 

} 

else 

this.„rowEnterlD = this._objDataSource.advi se(RS_ONROWENTER, 

'_CHK onrowenterC + this.„objDataSource,getiDO + ' + this. ID + 

StrDataField + ), ), ^p^^^ ^^^^^^^^j^^ ^ this._objDataSource.advise(RS_ONROWEXIT, 

'„CHK onrowexitC + this._objDataSource.getIDO + '> ' + this. ID + 
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strDataField + '");'); 

} 

} 

return true; 

} 

function _CHi<L.advi seCstr Event ,funcToCal1) 

^ var nAdviseiD = this._objEventManager.advise(strEvent ,funcToCall) ; 

if (nAdviselD != -1) 

evalCthis.' + strEvent + ' = _CHK fi reEvent ; ') ; 

return nAdviselD; 

} 

f uncti on _CHK„advi seDef aul tHandl er (st rName , strEvent) 
var nAdviselD = 

thi s._obiEventManager. advi seDef aul tHandl er(st rName, StrEvent) ; 
if (nAdviselD != -1) 

eval("this/' + strEvent + " = „CHK_fireEvent;") ; 

} 

function „CHK„unadvise(strEvent, nAdviselD) . . ^ 

{ return this._objEventManager.unadvise(strEvent,nAdviselD) ; } 

function „CHK_displayO 
{ } 

function _CHK fi reEvent(funcToFi re) 

. - ■ - -if. Ctypeof (funcToFire) == 'undefined') 

if (this._objEventManager != null) 

this._objEventManager.fi reEventC on' + wi ndow. event. type) ; 

} 

else 

_.EM f i reEvent (f uncToFi re) ; 

} 

function _CHK onrowenter(objRecordset,objCheckbox, strDataField) 

{ objcheckbox . setChecked(obj Recordset . f i el ds . getval ue(strDataFi el d)) ; } 

f uncti on _CHK on rowexi t (ob j Reco rdset , objTextBox , st rDataFi el d) 

^ var chkvalue = objcheckbox. getCheckedO ; 

if (typeof (chkvalue) != 'undefined' && chkvalue != null) 

ob j Recordset . f i el ds . setval ue (st rDataFi el d , chkval ue) ; 

} 

function _CHK onbeforefuncinit(objcheckbox) 

{ objcheckbox. adviseDefaultHandler(objcheckbox. id, CHK„ONCLICK) ; } 

function „CHK onbeforeupdate(obj Checkbox) 

if (objcheckbox. checked == false) 

//Make sure we have a default value 
objcheckbox. checked = true; 
objcheckbox. checked = false; 

} 

} 
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<SCRIPT RUNAT=SERVER LANGUAGE=" JavaScri pt"> 

// MSL : Microsoft Scripting Libary 

// visual interDev 6-0 DataGrid Object for ASP 

// copyright 1998 Microsoft Corporation. All Rights Reserved, 

f uncti on CreateDataGri d (st rName , f uncini t , ob j Parent) 

^ if Ctypeof(strName) == 'string' && strName != ") 

^ var objDataGrid = new _DataGri d(st rName, obj Parent) ; 

eval (strName + ' = objDataGrid*); 

objDataGrid.„f uncini t = funcinit; 

thisPage.advi se(PAGE_0NlNlT, StrName + ' ...restoreStateC) ); 
return objDataGrid; 

} 

return null ; 

} 

f uncti on _DataGri d (st rName , obj Parent) 

^ if (typeof CbDGPrototypeCalled) == 'undefined') 
_DG Prototype () ; 

// public members 
this. id = StrName; 
this. name = strName; 

~ 7A private members 

TV see the display method description below 

this.tableAttributes = "; // <table tableAttributes> 

this.headerAttributes = "; // <TR headerAttributes> 

this.headerwidth = new Array; // <TH> width attributes 
this.headerFormat = "; // <TH>header Format 

col Header [nCol ] </TH> 

this. col Header = new Array; 

this.rowAttributes = new Array; // <TR rowAttnbutes[nRow]> 
this. rowFormat = new Array; 

this. col Data = new Array; // <TD 

col Att ri butes [nCol ] >rowFormat [nRow] col Data [nCol ] </TD> 

this. col Attributes = new Array; // OR 

this. col Format = new Array; // <TD 

col Att ri butes [nCol ] >col Format [nCol ] col Data [nCol ] </TD> 

this._objDataSource = null; 
this._markPos = 0; 

} 

function _DG PrototypeC) 

„bDGPrototypeCalled = 1; 

//private members 

_DataGrid. prototype. pagesize = 0; 

„DataGrid. prototype. hasPageNumber = false; 

_DataGrid. prototype. all Columns = false; 

_DataGrid. prototype. displayHeader = true; 

_DataGri d, prototype. navbarAlignment = 'center'; 

„DataGrid. prototype. hi liteAttri butes ^ '*; // attributes 

applied to row of the current record 

„DataGrid, prototype. maintainstate = true; 
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_DataGrid. prototype. _bvi si ble = true; 
_DataGrid. prototype. „objPageNavbar = null; 
_DataGrid. prototype. „objRecordNavbar = null; 

//public methods 

„DataGrid. prototype. show = _DG_show; 

_DataGrid. prototype. hide = _DG_hide; 

_DataGrid.prototype.isVi si ble = _DG_is visible; 

_DataGrid. prototype. getPagingNavbar = _DG_getPagingNavbar; 

_DataGrid. prototype. getRecordsetNavbar = _DG_getRecordsetNavbar ; 

„DataGrid. prototype. bindAll Columns = _DG_bindAll Columns; 

//private methods 

_DataGrid. prototype. getDataSource = _DG_getDataSource; 
_DataGrid. prototype. setDataSource = _DG_setDataSource; 
_DataGri d. prototype. showPageNavbar = _DG„showPageNavbar ; 
_DataGri d. prototype. showRecordNavbar = _DG_showRecordNavbar ; 
_DataGrid. prototype. anchor = _DG_anchor; 
_DataGrid. prototype. display = _DG„di splay; 

_DataGrid. prototype. _f i reEvent = „EM fireEvent; 

_DataGrid. prototype. „preserveState = _DG preservestate; 

_DataGrid. prototype. _restoreState = __DG restorestate; 

„DataGrid. prototype. _onrowenter = _DG onrowenter; 

thisPage. registerMethodC^DG selectRow' ,_DG selectRow) ; 

//scope implementation in „DG Prototype function 

function _DG_show() 
-----{^ this,„bvisible = true; } 

function „DG_hideO 

{ this._bvisible = false; } 

function „DG_isvisibleC) 

{ return this.„bvisible } 

function _DG_getPagingNavbar() 

{ return this._objPageNavbar; } 

function „DG_getRecordsetNavbar() 

{ return this._objRecordNavbar; } 

function _DG_bindAllColumns() 

{ this. all Columns = true; } 

function _DG_getDataSource() 

{ return this.^objDataSource; } 

function _DG_setDataSource(objDataSource) 

if (typeof(objDataSource) == 'object') 

this._objDataSource = objDataSource; 

} 

f uncti on _DG„showPageNavbar (nMask , nAl i gnment) 

this._objPageNavbar = createRecordsetNavbar (this. name + 
PageNavbar ' , nul 1 , nul 1 ) ; 

thi s ._obj PageNavbar . setAl i gnment (nAl i gnment) ; 
thi s .„obj PageNavbar . setButtonStyles(nMask) ; 
thi s.„obj PageNavbar. pagesize = this.pagesize; 
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thi5._obqPageNavbar.updateOnMove = false; 
this. „obi PageNavbar . setDataSou rce (thi s . _ob j Dat asou rce) ; 
^ return tni s.„obj PageNavbar ; 

function _DG_showRecordNavbar(nMask,nAlignment) 

this._obiRecordNavbar = CreateRecordsetNavbar (this. name + 
'_RecordNavbar' ,nun ,nul1) ; 

this, _ob j RecordNavbar . setAl i gnment (nAl i gnment) ; 
this-_objRecordNavbar . setButtonStylesCnMask) ; 
this._objRecordNavbar.pageSize = 1; 
this._objRecordNavbar.updateonMove = false; 
thi s .„obj RecordNavbar . setDataSource(thi s .„objDataSource) ; 
return thi s._obj RecordNavbar ; 

} 

function „DG„anchor(strText) 

var nindex = this._objDatasource.absolutePosition; 
if (Number (nindex) > 0) 

if (typeof(strText) == 'undefined' M strText == ") 

strText = nindex; 
return '<a href="3avaScript:thisPage.invokeMethod(' + 



} 



} 

return 



" , '_DG select row' , " + 

"new ArrayC" + this. name + + nindex 

'">' + StrText + '</a>' ; 



function _DG_display() 
{ 

if (this._bvisible) 
{ 



ob jRS.fi el ds.getName(i) + 



var objRS = this._objDataSource; 
if (objRS != null && ! ob j RS._is Empty ()) 

// commandeer EventManager of Recordset to prevent 
// onrowenter events to other bound controls while 
// displaying the grid 
var objRSEM = objRS.„obj EventManager; 
objRS._obj EventManager - CreateEventManager() ; 

if (objRS.BOF) objRS.moveFi rst() ; 

else if (objRS.EOF) objRS.moveLastO ; 

if (this, all Columns) 

{ // auto-generate data from recordset 

this. col Header .length = 0; 
this. col Data. length = 0; 
thi s.headerwidth. length = 0; 
var ncount = ob jRS.fi el ds. getcount () ; 
for (var i=0; i < nCount; i++) 

if (this.displayHeader) 

this. col Header [i] = + 



this.headerwidth[i] = 

Page 3 



DATAGRID.ASP 



' .fields. getvalueC + i + ') 



} 

this. col Data [i] = objRS.name + 



} 



eel 1 spaci ng=0><TR><TD>\n ' ; 
+ 'An'; 

this.headerAttributes + '>\n'; 
nCol++) 



var nCols = this. col Data. length; 
if (nCols > 0) 

^ var strHTML = '<TABLE border=0 cenpadding=0 

strHTML += '<TABLE ' + thi s . tabl eAtt ri butes 

var nHeaderCols = this. col Header. length; 
if (nHeaderCols && this.displayHeader) 

StrHTML += '<TR ' + 



for (var ncol=0; nCol < ncols; 

StrHTML += •<TH ' + 

this.headerwidth[nCol] + + this.headerFormat + eval (this. col Header [nCol]) + 
V</TH>\n^ ^ 

StrHTML += '</TR>\n'; 



table header 



Response. writeCstrHTML) ; 



// output 



mark current position 



1) / this.pagesize) ; 
this.pageSize) + 1) ; 



this._markPos = objRS.absolutePosition; // 

var curPage = 0; 
var nAdviselD = -1; 
this rowcount - 0; 

if (this.pagesize > 0 && this._markPos > 0) 
{ // display current page only 

curPage = parselnt((this._markPos - 

objRS.moveAbsolute((curPage - 



nAdviselD = 

obi RS. advise (RS„ONROWENTER, this. id + ' .„onrowenter() ' ) ; 

for (var i=:l; i < this.pageSize; 

i++) 



} 

else 
{ 



{ 



} 



if (objRS.EOF) 
break; 
ob j RS . moveNext () ; 



// display ALL records 
ob j RS . moveFi rst () ; 
nAdviselD = 

obiRS.advise(RS„ONROWENTER, this. id + ' .„onrowenter() ') ; 

while (! objRS.EOF) 

objRS. moveNext 0 ; 

} 

} 
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StrHTML = '</TD></TR>\n<TR><TD 

StrHTML += '<TABLE width=100% 

Response, write(strHTML) ; 
Response -write('<TD align=' + 

if (this._objPageNavbar != null) 

^ if (this._objRecordNavbar 



{ 



if 
{ 



if 



if 
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objRS.unadvise(RS_ONROWENTER,nAdviseiD) ; 
objRS.moveAbsolute(this._markPos) ; 
Response .wri te C ' </TABLE>\n ' ) ; 

if (this.„objPageNavbar != null || 
this._objRecordNavbar 1^ null I I this.hasPageNumber) 

numbering 

align=center>\n' ; 

border=0><TR>\n' ; 

this.navbarAlignment + '>'); 
null) 

(thi s .„obj PageNavbar . i svi si bl eQ) 

(this._objPageNavbar.getButton(0) null) 
thi s . _ob j PageNavbar . getButton (0) . di spl ay Q ; 
(thi s.„obj PageNavbar. getButton(l) != null) 
tMiVIoB'j PageNavbar. getButton (1) .display () ; 
thi s ._ob j RecordNavbar . di spl ay 0 ; 
(this._objPageNavbar.getButtonC2) != null) 
thi s . _ob 3 PageNavbar . getButton (2) . di spl ay Q ; 
(thi s._obj PageNavbar. getButton (3) != null) 
thi s ._ob j PageNavbar . getButton (3) . di spl ay () ; 

thi s .„ob j PageNavbar . di spl ay () ; 
thi s .^ob j RecordNavbar . di spl ay () ; 

this. _ob j Pag eNavba r.displayO; 
null) 

thi s ._obj RecordNavbar . di spl ay () ; 



if 



if 



} 

else 
{ 



} 

else 



} 



else if (thi s,_obj RecordNavbar != 



Response .wri teC </TD>\n ' ) ; 
if (this.hasPageNumber) 

^ var npages = 1; 

var nCount = 
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objRS.getCountO ; 

if (ncount > 0 && 

this.pagesize > 0) ^p^^^^ ^ ^^^^^^^^ _ 

1 ) / this.pagesize) + 1; ^^^^^^ ^ align=Hght 

val i qn=mi ddl e> ' ; , 

^ StrHTML += '<FONT 

size=2><N0BR>Paqe : * + StringCcurPage+1) + ' of ' + parselnt(nPages) + 

•</NOBR></FONT>^ StrHTML •</TD>\n'; 

Response. writeCstrHTML) ; 

Response .wri te( ' </TR></TABLE>\n ' ) ; 

Response . wri te C </TD></TR></TABLE>\n ' ) ; 

// restore original RS EventManager 
objRS._objEventManager = objRSEM; 

} 

> 

this._preserveStateO ; 

} 

function _DG preservestateQ 

if (this.maintainState) 
{ // preserve state in hidden field 

var state = new object; 
' * " ^ state. _bvi si bl e = this. „bvi si ble; 

if (this, all columns) 

state. all columns = true; 
return thi sPage . persi ststate(thi s . name , state) ; 

return false; 

} 

function „DG restoreStateQ 

var r = false; 

thi s -_f i reEvent Cthi s .„f uncini t) ; 
if (this.maintainState) 

^ var state = thi sPage.unpersistState(this. name) ; 

if (state != null) 

^ if (state,_bvisible != null) ...... . op 

this.„bvisible = (state. _bvi si ble != '0' && 

state -_bvi si ble != 'false'); 

else 

this._bvisible = true; 

if (state. allcolumns 1= null) 

this. all Columns = (state, all Columns N 0 

&& state. all Columns != 'false'); 

else 

this. all Columns = false; 



r = true; 
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return r; 

} 

function _DG onrowenterO 

{ // output a single row <TR> for current record 

if (this._objDatasource.EOF) 
return; 

var hilite = ' ' ; 

if (this. hi liteAttributes. length && , , 

this.^markPos == this.„obiDataSource.absolutePosition) 
hilite = this. hi liteAttributes; 

var strHTML = '<TR>\n'; 

if (this. rowAttributes. length) 

{ // apply row attributes to <TR> 

var nRow = this.„rowCount % this. rowAttributes. length; 

StrHTML = '<TR ' + hilite + ' ' + this. rowAttributes [nRow] 



} 

else 



StrHTML = '<TR ' 4- hilite + '>\n'; 



// output <TD> for each column in row 

var nCols = this. col Data. length; 

for (var ncol=0; nCol < nCols; nCol++) 

// apply column attributes to <TD> 
if (nCol < this. col Attributes. length) 

StrHTML += '<TD " + hilite + ' ' + 

this.colArtributesEncol] + *>'; 

else 

StrHTML += '<TD>' ; 

// determine format per data column 

if (typeof (this. col Format [nCol]) != 'undefined') 

{ // use column format 

StrHTML += this.col Format [nCol ] ; 

else if (this. rowFormat. length) 
{ // use row format 

var nRow = this._rowCount % this. rowFormat .length; 

StrHTML += this, rowFormat [nRow] ; 

} 

StrHTML += eval (this. col Data [nCol]) ; 
StrHTML += '</TD>\n'; 

} 

StrHTML += '</TR>\n'; 
Response. write(strHTML) ; 
this._rowCount++; 

} 

} // end of _DG Prototype function 

f uncti on _DG sel ectRow(st rName , nindex) 

var object = null ; 

if (typeof(RuntimeObiect) != 'undefined') 

{ // use global namespace to acquire object of 'strName 

var objects = RuntimeObject(strName) ; 
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object = objects [strName] ; 

if (object != null && typeof (object) == 'object' && 
typeof(object.__obiDataSource) == 'object') u ^ ^ j ^^ 

object._objDataSource.moveAbsolute(Number(nlndex)); 

} 

</SCRIPT> 
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// Microsoft Script Library<BR> 

// Visual interDev 6.0 DataGrid Object for dhtml<br> 

// copyright 1998 Microsoft Corporation. All Rights Reserved. <BR> 

// <B>Do not modify in design view. Switch to source view.</B><BR> 

// <SCRIPT> 

f uncti on CreateDataGri d (st rName , f uncini t , ob j Parent) 

^ if (typeofCst rName) != 'string' || strName == ") 

return null ; 



id=' 



// create tag in document 

var strTag - '<TABLE cellspacing="0" cellpadding=' 0' name= + strName + 
StrName + •"><tr><td></td></tr></table>' 
if (typeofCobj Parent) == 'object') 

obj Parent . i nsertAd jacentHTML ( Bef oreEnd , strTag) ; 

else 

document. wri te(st rTag) ; 

var objTable = document. all [strName] ; 
if (typeof (objTable) != 'object') 

return null ; .^ 
var bNameExists = eval ('typeof (' + strName + ) = object ); 
if (! bNameExists) 

eval (strName + ' = objTable'); 



// pub 
objTab 
obqTab" 
' ' "? obqTab' 
'ObjTab'' 
col Header [nCol 
objTab 
objTab 
objTab" 
objTab"' 



ic members 

e.tableAttributes = // <table tableAttnbutes> 

e.headerAttributes = // <TR headerAttnbutes> 

e.headerwidth - new Array; // <TD> width attributes 

e. header Format = "; // <TH>headerFormat 

</TH> 

e. col Header = new Array; 

e.rowAttributes - new Array; // <TR rowAttn butesCnRow]> 
e.rowFormat = new Array; 
e. col Data = new Array; // <TD 

col Attri butes [nCol ]>rowFormat [nRow] col Data [nCol ] </td> 
objTable. col Attributes = new Array; // OR 
objTable. col Format = new Array; // <td 

col Att ri butes [nCol ] >col Format [nCol ] col Data [nCol ] </TD> 
objTable. pagesize = 0; 
objTable. all Columns = false; 
ob jTable. hi liteAttri butes = '*; 
objTable.hasPageNumber = false; 
objTable.displayHeader = true; 
objTable.navbarAlignment = 'center'; 

// published methods 
objTable. show = _DG_show; 
objTable, hide = _DG_hide; 
objTable.isvisible = „DG_i sVi si bl e ; 
objTable.getPagingNavbar = _DG_getPagingNavbar ; 
objTable.getRecordsetNavbar = _DG.getRecordsetNavbar ; 
objTable.bindAll Columns = .DG^bindAll Columns; 

// public methods 

objTable. getDataSource = _DG„getDataSource; 
objTable.setDataSource = „DG_setDataSource; 
objTable, showPageNavbar = _DG_showPageNavbar ; 
objTable. showRecordNavbar = _DG_showRecordNavbar ; 

// private methods 
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objTable.^fireEvent = _DG_f i reEvent ; 

objTable._evalRowlnfo = _DG evalRowlnfo; 

objTable._evalSingleRow = „DG evalSingleRow; 

ob j Tab! e.„di splay = _DG_display; 

objTable._syncTableProperties = _dg syncTableProperties; 

obj Table. onclick = _DG onclick; 

objTable.onkeydown = _DG onkeydown; 

// private members 
objTable.^obiDataSource = null; 
objTable.^objNavbar = null; 
objTable.„objRecNavbar = null; 
objTable._rowCount = 0; 
objTable._bExclusive = false; 
objTable._bEvalinglnfo = false; 
objTable.__curPaqe = 0; 
objTable._rowinfo = new Array; 

objTable-_objEventManager = CreateEventManagerC) ; 

ob jTabl e . __f i reEvent (f uncini t) ; 

objTable.^auxlD ^ 'DataGrid'; 

if (document. body. onafterupdate == null) 

^ DG_ONAFTERUPDATE = ' datagri donaf terupdate " ; 

document -body. onafterupdate = _DG bodyonafterupdate 

} 

return objTable; 

} 

- fun e t i 6h ■ JDG^s how () 

^ this.style.visibility = 'visible'; 

this,„display() ; 
thi s .„syncTabl eProperti es () ; 

} 

function _DG„hide() , , ^ 

{ this.style.visibility- 'hidden'; } 

function _DG_isvi si bleO 

{ return (this.style.visibility != hidden ); } 

function _DG_getPagingNavbar() . ^ 

{ return document. all (this. id + '_PageNavbar ); } 

function _DG„getRecordsetNavbar() 

{ return document. all (this. id + '_RecordNavbar ); } 

function „DG_bindAllColumns() 

this. all Columns = true; 
this._curPage = -1; 
__DG onrowenter (thi s) ; 

} 

function _DG_getDataSource() 

{ return this._objDataSource; } 

f unct i on _DG„setDataSou rce (obj DataSou rce) 

^ if (typeof(objDataSource) != 'object') 

return false; 
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if (this.„obiDatasource != null) 
{ 

this ._objDataSource.unadvi5e(RS_ONROWENTER, this.^onrowenterlD) ; 

thi s ._objDataSource. unadvise(RS_ONAFTERUPDATE, 
thi s ._onafterupdatelD) ; 

this. _ob j Datasource . unadvi se (dg_onafterupdat£ , 
this-_dgonafterupdateiD) ; 

thi s . _obj Datasource . unadvi se(RS_ONDATASETCOMPLETE , 
thi s ._ondatasetcompl etelD) ; 

this._objDataSource = obj Datasource; 

var objNavbar = this.getRecordsetNavbarC) ; 
if CobjNavbar != null) 

objNavbar . setDataSource(objDataSource) ; 

objNavbar = this.getPagingNavbarO ; 
if (objNavbar != null) 

obj Navbar , setDataSou rce (ob jDataSou rce) ; 

if Cthis.„objDatasource != null) 

this._bExclusive = true; 

this._onrowenterID = objDataSource. advise (RS_ONROWENTER, 
*_DG onrowenterC + this, name + *);'); 

this.„onafterupdatelD = objDataSource-adviseCRS_ONAFTERUPDATE, 
'_DG onafterupdateC + this. name + *, true);'); 

. this._dgonafterupdatelD = objDataSource.advise(DG_ONAFTERUPDATE, 

'„DG onafter update (' + this. name + false);'); 

this._ondatasetcompletelD = 
ob jDataSou rce. advise(RS_ONDATASETCOMPLETE, this, name + ' .^curPage = 
-1;_DG onrowenterC + this, name + ');'); 

this.„bExclusive = false; 

} 

return true; 

} 

f uncti on _.DG_showPageNavbar (nButtonMas k , nAl i gnment) 

var objNavbar = this.getPagingNavbarO; 

if (objNavbar == null) 

var objRecNavbar = this.getRecordsetNavbarO ; 
if (objRecNavbar === null) 

this.insertRowO.insertCellO.innerHTML = *<table navbar="r 
width=100% border^OxTRxTD align=' + thi s.navbarAli gnment + "x/tdxTD align=right 
val i gn=mi ddl e></TDx/TR></TABLE> ' ; 

objNavbar = CreateRecordsetNavbar (this. name + 

'-PageNavbar' , null , 

this. rows (1) . eel 1 s (0) , chi 1 dren (0) . rows (0) . cell s (0) ) ; 
} 

else 

var nPlace = (objRecNavbar .children .length - 
(objRecNavbar. children. length % 2)) / 2; 

ObjNavbar = CreateRecordsetNavbar (this. name + 
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'_pageNavbar' , null , objRecNavbar.children(nPlace)) ; 

ob j Navbar . setAl i gnment (nAl i gnment) ; 
ob j Navbar . setButtonStyl es (nButtonMask) ; 
obj Navbar. updateOnMove ~ false; 
if Cthis._objDataSource != null) 

objNavbar.setDataSource(this._ob3DataSource); 

ob j Navbar. pagesize = this.pagesize; 

} 

return obj Navbar; 

} 

f uncti on _DG_showRecordNavbar (nButtonMask , nAl i gnment) 

^ var objRecNavbar = this.getRecordsetNavbarO ; 

if (objRecNavbar null) 

^ var obiNavbar = this.getPagingNavbarO ; 

if (ob] Navbar == null) 

^ this.insertRowO.insertCellO-innerHTML = '<TABLE navbar="r 

width=100% border-OxTRxTD align=' + this.navbarAli gnment + 'x/TDxTD align=nght 
valiqn=middlex/TDx/TRx/TABLE>' ; , , ^i.- 

^ ObjRecNavbar = createRecordsetNavbar (this. name + 

'_RecordNavbar' , ^^1-, 
thi s, rows (1) . eel 1 s (0) . chi 1 d r en (0) . rows (0) . eel 1 s (0) ) ; 
else 

^ var nPlace = (obj Navbar .children. length - 

(objNavbar. children. length % 2)) / 2; .u^.r^-k-; c «=.mo x 

^ ■ objRecNavbar = createRecordsetNavbar (this. name + 

' RecordNavbar* , null, objNavbar. children (nPl ace)) ; 

} 

ob jRecNavbar.setAli gnment (nAl i gnment) ; 
objRecNavbar. setButtonStyles(nButtonMask) ; 
objRecNavbar. updateOnMove = false; 

if (this.^objDataSource != null) 

ObjRecNavbar. setDataSource(this._ob3DataSource) ; 

} 

return objRecNavbar; 

} 

function „DG fi reEvent(funcToFi re) 

^ if (typeof (funcToFire) == 'undefined') 

^ if (this.^objEventManager 1= null) ^ . 

this._objEventManager.fireEvent('on' + wi ndow . event . type) , 

} 

else . ^ 

„EM f i reEvent(f uncToFi re) ; 

} 

function _DG evalRowlnfoO 

^ var objRS = this._objDataSource; 
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if (objRS.absolutePosition > (this.pagesize * this.__curPage)) 

this.„rowlnfo. length = objRS.absolutePosition - this.pagesize * 
this.^curPage - 1; 
else 

this._rowlnfo. length =0; 
if (this, all Columns) 

{ // auto-generate data from recordset 

this. colHeader. length = 0; 
this. col Data. length = 0; 
this.headerwidth. length = 0; 
var nCount = ob jRS.fi el ds. getCount () ; 
for (var i=0; i < nCount; 

^ if (this.displayHeader) 

^ this. col Header [i] = + ob jRS.fi el ds.getName(i) + 

this.headerwidth[i] - 

this, col Data [i] = objRS.name + * .fields. getvalueC + i + 



} 



} 



if (this.hasPageNumber) 
var nPages = 1; 

var nCount = obiRS.getCountO ; 
var strHTML = ' ; 

— if (nCount > 0 && this.pagesize > 0) . ^ , 

nPages = ((nCount - 1) / this.pagesize) +1; , ^ 

StrHTML += '^<FONT SI ze=2><N0BR>Page : ' + (this._curPage + 1) + ot 
' + Darseint(nPaqes) + '</NOBR></FONT>' ; ^ ^ . 

this. rows (1) . eel 1 s (0) . chi 1 d ren (0) . rows (0) . eel 1 s (1) . i nnerHTML = 

StrHTML; 

} 

this. _rowlnfo[this._rowlnfo. length] = this-_evalSingleRow() ; 

this._bEvalinglnfo = true; .... ^u- c-- « 

for (this.„rowCount = this.„rowlnfo. length; (this.^rowcount < this.pagesize 
&& lobjRS.EOF) II (this.pagesize == 0 && lobjRS.EOF); ++ thi s ._rowCount) 
obiRS.moveNextO ; 
this._bEva1inglnfo = false; 

this._rowCount = 0; 

} 

f uncti on _DG eval Si ngl eRow(hi 1 i te) 

^ if (this._objDataSource.EOF) 

return ' ' ; 

var strDetail = ' ' ; 

var nCols = thi s .col Data. length ; 

for (var ncol=0; ncol < nCols; nCol++) 

^ // apply column attributes to <td> 

StrDetail += '<td' ; 
if (typeof(hilite) != 'undefined') 
StrDetail += ' ' + hi lite; 
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if (ncol < this. col Attributes. length) 

strDetail += ' ' + this.colAttributes[nCol] ; 

strDetail +:= ; 

// determine format per data column 

if (typeof (this. col Format [nCol]) != 'undefined') 

{ // use column format 

StrDetail += this.colFormat[nCol] ; 

else if (this. rowFormat- length) 
{ // use row format 

var nRow = this.^rowCount % this. rowFormat. length; 

StrDetail += this. rowFormat[nRow] ; 

} 

StrDetail += eval (this. col Data [ncol]) ; 
StrDetail += '</TD>\n'; 

} 

return strDetail ; 

} 

function _DG displayO 

^ var objRS = this._objDataSource; 

var strHeader = ■<TA8LE ' + this.tableAttributes + '>\n'; 
var nHeaderCols = this. col Header .length; 
if (nHeaderCols) 

— StrHeader += '<TR * + this.headerAttributes + '>\n'; 

for (var nCol=0; nCol < nHeaderCols; nCol++) 

StrHeader += '<TH ' + this.headerWidth[nCol] + > + 
this.headerFormat + eval (this. col Header [nCol]) + '</TH>\n'; 

StrHeader += '</TR>\n'; 

} 

var strBody = ' ' ; 
var nRowToScroll = 0; 

for (this.„rowCount = 0; this._rowCount < this._rowlnfo. length; 
++thi s ._rowCount) 

^ var nPos = (this.„curPaqe) * this.pagesize + this.„rowCount + 1; 

if (this. rowAttributes. length) 
{ // apply row attributes to <TR> 

var nRow = this.„rowCount % this. rowAttributes. length; 
strBody += '<TR ' + this, rowAttributes [nRow] + '>\n'; 

} 

else 

StrBody += '<TR>\n' ; 

if (this. hi liteAttributes. length && nPos == 
thi s . „obi Datasource . absol utePosi ti on) 
{ 

nRowToScroll = this._rowCount; 

StrBody += thi s . _eval Si ngl eRow(thi s . hi 1 1 teAtt n butes) ; 

else 

StrBody += this._rowlnfo[this._rowCount] ; 
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strBody -h= '</TR>' ; 

} 

this._rowCount = 0; 

var objlnnerTable = this. rows (0) .cells (0) ; 
objinnerTable.innerHTML = strHeader + strBody + '</table>'; 
//fix scroll Intoview and hi lite for TDs 
if (objlnnerTable.children(O) . rows(nRowToScroll) != null) 

objlnnerTable. children(O) . rowsCnRowToScroll) .scroll intoviewCt rue) ; 



f uncti on _DG syncTabl eProperti es () 

^ var objlnnerTable = this. rows (0) .cell s(0) .children(O) ; 

this. align = objlnnerTable. align; 
this. width = objlnnerTable. width; 
objlnnerTable. width = "100%"; 
this. bgcolor = objlnnerTable. bgcolor ; 

} 

function _DG onclickO 

var ob]DataGnd = event , srcElement; 
var bFound = false; 
var nindexAux = 0; 
var nindex = 0; 

if (document. selection. type != 'None') 
return; 

- ■ ^ '^"while (ClbFound) && (typeof (objDataGrid) != 'undefined') && (objDataGrid != 
null)) - 



{ 



== 'DataGrid')) 

} 
i 

IG 
{ 



if (typeof CobjDataGrid.navbar) == 'string') 
return; 

if (objDataGrid.tagName ^= 'TR') 

nindex = nindexAux; 

nindexAux = objDataGrid. rowindex; 

} 

if ((typeof (objDataGrid._auxlD) == 'string') && (objDataGrid._auxlD 

bFound = true; 

else . . -, 

objDataGrid = objDataGnd.parentElement; 



if ((bFound) && (typeof (objDataGrid. hiliteAttributes) != 'undefined') && 
(ObjDataGrid. hiliteAttributes != null) && (objDataGrid. hiliteAttributes. length)) 

var objRS = objDataGrid.^objDataSource; 

if ( (typeof (objRS) != 'undefined') && (objRS != null)) 

^ var nPos = objRS.absolutePosition; 

var noffset = objDataGrid.pageSize * objDataGnd._curPage; 

if ((this.colHeader. length ==0) ll ! thi s.displayHeader) 

++nlndex; 

if (nindex != 0) 
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objRS.moveAbsoluteCnOffset + nindex) ; 



ob j DataGri d . focus () ; 



} 

function _DG onkeydownO 

var objDataGrid = event . srcElement; 
var bFound = false; 



null)) 



while ((IbFound) && (typeof (objDataGrid) != 'undefined') && (objDataGrid !== 



== ' DataGri d')) 



} 



if ((typeof (objDataGrid. _auxlD) == 'string') && (objDataGrid. _auxlD 



else 



bFound = true; 
objDataGrid 



= objDataGrid.parentElement ; 



if ((bFound) && (typeof (objDataGrid. hi liteAttributes) != 'undefined') && 
(objDataGrid. hi liteAttributes != null) && (objDataGrid. hiliteAttributes. length)) 

var objRS = objDataGrid._objDataSource; 
if (objRS != null) 

var nKey = window.event . keycode; 
^ if (nKey == 40) //down arrow 

if (! objRS. EOF) 

objRS.moveNextO ; 

else if (nKey == 38) //up arrow 
{ 

if (lobjRS.BOF) 

ob j RS . movePrevi ous () ; 

else if (nKey == 34) 

var nPos = objRS. absolutePositi on + 

if (nPos > objRS. getCountO) 
objRS.moveLastO ; 

else 

ob j RS . moveAbsol ute (nPos) ; 



ob j DataGri d . pagesi ze ; 



ob j DataGri d . pageSi ze ; 



else if (nKey == 33) 

var nPos = objRS. absolutePositi on - 

if (nPos < 1) 

ob j RS . moveFi r st () ; 

else 

ob j RS . moveAbsol ute (nPos) ; 

else if (nKey == 36) 

ob jRS. moveFi r St 0 ; 
else if (nKey == 35) 

ObjRS.moveLastO ; 
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else 

return; 

} 

} 

} 

function JDQ onrowenter(objDataGrid) 

if (! objDataGrid.„bExclusive) 

if (objDataGrid._bEvalinginfo) 

ob j DataGri d .„rowinf o [ob jDataGri d ._rowlnf o . 1 ength] = 
ob j DataGri d . _eval Si ngl eRow() ; 
else 

var objRS = objDataGrid._objDataSource; 
var nPos = objRS.absolutePosition; 
if (nPos <= 0) 

^ if ((nPos ==0) II (nPos == -1)) //Start, unknown 

empty recordset . , , ^ -. u ^ 

ob]DataGnd.„rowinfo. length = 0; 

else 

return; 

} 

else 
{ 

var curPage; 

if (ob jDataGri d.pagesize > 0) 
- ' - curPage = ((nPos -1) - ((nPos - 1) % 

objDataGTi d.pagesize)) / obj DataGri d.pagesize; 

else 

curPage ~ 0; 
if (curPage != objDataGrid.^curPage) 
^ if (typeof(objRS._rsRDS.lnternetTimeout) 



'undefined*) 

movement in onrowenter handler 
window. event. type == 'rowenter') 
after exiting onrowenter handler 



{ // RDS 1.5 does not allow cursor 

if (window. event 1= null && 
{ // defer movement until 



window. setTimeout('_DG onrowenterC + objDataGrid.id + ')',0); 

return; 

} 

} 



obj DataGri d.pagesize) + 1); 



obj DataGri d._bExclusive = true; 
objRS.moveAbsolute( (curPage * 

objDataGrid.^bExclusive = false; 

objDataGrid.^curPage = curPage; 
objDataGrid._eval RowinfoO ; 

obq DataGri d._bExclusive = true; 

obj RS . moveAbsol ute (nPos) ; 

ob j DataGri d.„bExclusive = false; 

Page 9 



DATAGRID.HTM 

objDataGrid._display() ; 

ob j DataGri d ._syncTabl eProperti es () ; 

} 

} 

} 

function _DG_onafterupdate(objDataGrid, bDisplay) 

^ var objRS = obj DataGri d.^objDataSource; 

var nPos = objRS.absolutePosition; 

if CCobjDataGrid.pageSize =-0) || ((nPos > objDataGrid._curPage - 

obi DataGri d.pagesize) && . , . ^ ^- ^^^ 

(nPos <= (objDataGrid._curPage + 1) * objDataGnd.pageSize))) 

^ obj DataGri d ._eval Rowinf o() ; 

obj DataGri d._bExc1usive = true; 
objRS.moveAbsolute(nPos) ; 
objDataGrid._bExclusive = false; 

else if (nPos ==0) . ^ 

objDataGrid._rowlnfo. length = 0; 

if (typeofCbDi splay) == 'boolean' && bDisplay == true) 



^ nh-in;5tar;rid. diSDiavl,, , 

lePropertiesO ; 

} 



ob j DataGri d.„displ ay C) ; 
obj DataG r i d . _syn cTabl < 



y 

function _DG bodyonafterupdateC) 

^ var objRS = _DG findRecordSourceCevent.srcElement) ; 

if (CobiRS != null) && (typeof (objRS. _objEventManager) != 'undefined')) 
obj RS . _ob j EventManager . f i reEvent (DG^QNAFTERUPDATE) ; 

} 

function _DG findRecordSource(objSrcElement) 

var bFound = false; 

var objsrc = objsrcElement ; 

while ((IbFound) && (typeof (objsrc) != 'undefined') && (objSrc != null)) 

^ if (typeof(objSrc.getDataSource) != 'undefined') 

bFound = true; 

else 

objsrc = objsrc. parentElement; 

} 

if (bFound) 

retu rn ob j Sr c . getDataSou rce () ; 

else 

return null ; 
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<SCRIPT RUNAT=SERVER LANGUAGE="DavaScri pt"> ^ 
II Microsoft Scripting Libary 

// visual interDev 6.0 EventManager Object for ASP 

// copyright 1998 Microsoft Corporation. All Rights Reserved. 



II IMPLEMENTATION MERGED INTO PM.ASP 

// THIS FILE IS NO LONGER INCLUDED BY DTCS , 

</SCRIPT> 
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// Microsoft Script Library<BR> 

// visual interDev 6-0 EventManager Object for DHTML<BR> 

// copyright 1998 Microsoft Corporation. All Rights Reserved, <BR> 

// <B>Do not modify in design view, switch to source view.</B><BR> 

A A- *************** -it*** 

// <SCRIPT> 

f uncti on CreateEventManager (strName) 

if (typeof (strName) 'string') 

^ if (eval C typeof C„EM_' + strName + ')') != 'object') 

evai('„£M_' + StrName + ' = new _EventManagerO ') ; 
return evalC-EM_' + strName); 

return new „EventManager() ; 

} 

function _„EventManagerO 

_EM_Prototype() ; 
this._events = new Array; 
this._nLastAdviselD = 0; 

} 

function _EM_Prototype() 

_EventManager. prototype. advise = _EM_advise; 

_EventManager . prototype . advi seDef aul tHandl er = _EM_advi seDef aul tHandl er 
„ EventManager. prototype. unadvise = „EM_unadvise; 

lEventManager. prototype. fireEvent = _EM„fi reEvent ; 
"lEventManager, prototype. get Eventcount = „EM_getEventcount; 

_EventManager. prototype. get Event = _EM_getEvent ; 

} 

function _EM_Advisor() 

this.funcToCall = 0; 
this.nAdviselD = 0; 

} 

f uncti on _EM_advi se(str Event , f uncToCal 1 ) 

^ if ((typeof (strEvent) == 'string') && 

(strEvent != ") && 
(typeof (funcToCall) 1= 'undefined')) 



{ 



if (typeof (this.„events [strEvent]) 'undefined') 
this.^events [strEvent] = new Array; 

var adviseList = thi s._events [strEvent] ; 
var obi Advisor = new „EM_Advisor; 
objAdvisor.funcToCall = f uncToCall ; 
objAdvisor.nAdviselD = ++this._nLastAdviseID; 
advi seList[adviseLi St. length] = objAdvisor; 
return this._nLastAdviselD; 

} 

return -1; 

} 

f uncti on _EM_advi seDef aul tHandl er (strName , strEvent , bvi rtual Event) 
var nAdviselD = -1; 
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var strDefaultHandler = strName + + strEvent; 
// temporarily commandeer the onerror event to prevent 
// error message for a known script engine 3.1 issue 
// when using typeof on a non- javascript function 
var fnUserErrorHandler = window.onerror ; 
window. onerror = _EM suppressError ; 

// the 4.0 j script engine will return * unknown' for VBScript functions 
// this mechanism is used to wire-up virtual events, but real HTML events 
// are automatically fired by IE4 so real events should not be wired up or 
// the eventhandler will be called twice 

if Ceval ('typeof C + strDefaultHandler + == 'function' || 

((typeof (bvirtual Event) != 'undefined') && bvi rtual Event && 
eval ('typeof (' + strDefaultHandler + ')') 'unknown')) 

nAdviseiD = this.advise(strEvent, strDefaultHandler + '()'); 

window. onerror = fnUserErrorHandler; 

return nAdviselD; 

} 

function _EM suppressError(msg,url ,line) \ 

{ // used to suppress harmless error message in 3.1 scripting engines 

window.event . returnvalue = true; 

} 

f uncti on _EM__unadvi se(st rEvent , nAdvi seiD) 

^ if ((typeof (strEvent) != 'undefined') M 

(nAdvi selD != 'undefined') && 
(typeof (this._events [strEvent]) != 'undefined')) 

^ . _ „ var adviseList = thi s.„eventsCst rEvent] ; 

* : • ^ adviseList. length 

for (var i=0; i < nLen; i++) 

if (advi seLi St [i] .nAdvi selD == nAdviselD) 

for (var j = Number(i); j < nLen - 1; j++) 

adviseList[j] = adviseList[j+l] ; 
adviseList. length -= 1; 
return true; 

} 

} 

} 

return false; 

} 

function _EM_fireEvent (strEvent) 

^ if (typeof (this._events [strEvent]) != 'undefined') 

var bReturn ^ true; 

var adviseList = thi s._events [strEvent] ; 
for (var i=0; i < adviseList. length; i++) 

„EM fi reEvent(adviseLi st[i] .funcToCall) ; 

} 

} 

function _EM_getEventCount() 

var nLength = 0; 

for (var event in this.„events) 

nLength++; 
return nLength; 

} 
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function „EM_getEventCnindex) 
{ 

var 1=0; 

for (var event in this.„events) 

if (nindex == i) 

return event; 

} 

return ' ' ; 

} 

function _EM fi reEvent(funcToFi re) 

if (document. readyState != 'complete') 

if (typeof(_EM EventManager) 'undefined' M _EM — EventManager == 



null) 



_EM EventManager = new _EventManager() ; 

document .onreadystatechange = _EM fi remit; 

„EM EventManager . advi se( ' oni nit', f uncToFi re) ; 

return; 

} 

if (typeof (f uncToFi re) == 'string') 

eval (f uncToFi re) ; 
else if (typeof (funcToFi re) == 'function') 

funcToFi re() ; 



function _EM firelnitO 

if (document . readyState == 'complete') 

_EM EventManage r . f i reEvent ( ' oni ni t ' ) ; 

_EM EventManager = null; 

} 

} 

function encodeHTMLQuotes(strin) 
{ 

var strout; 

while (strout != strin) 
{ 

strout = strin; 

strin = strin. replaceC" , '"'); 

} 

return strOut; 
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<SCRIPT RUNAT=SERVER LANGUAGE="DavaScri pt"> 

1 1 A ^ ^- Ji- ^- ^ f - J- V- V5f 

// Microsoft script Library 

// visual interDev 6,0 Label object for ASP 

// copyright 1998 Microsoft corporation. All Rights Reserved. 

f uncti on CreateLabel (st rName , f uncini t , ob j Parent) 

^ if (typeof (strName) == 'string' && strName != ") 

^ var obj Label = new „Label (strName) ; 

eval (strName + ' = obj Label'); 
obj Label .„f uncini t = funcinit; 

thisPage.advise(PAGE„ONlNiT, StrName + ' .„restoreState() ); 
return obj Label ; 

return null ; 

} 

function _Label (strName) 

^ if (typeof (_bLBLPrototypeCal led) == 'undefined') 
_LBL PrototypeO ; 



} 



//public members 
this. id = StrName; 
this. name ^ strName; 



"f uncti on^jLBi PrototypeO 

_bLBLPrototypeCalled = 1; 
//public members 

_Label .prototype. maintainstate = true; 

//private members 
_Label .prototype. „bvi si ble = true; 
_Label .prototype. _objDataSource = null; 
_Label .prototype. _strDataFi eld = "; 
_Label .prototype. _strcapti on = "; 
_Label .prototype. „dataFormatAs = 'text'; 



//public methods 

„Label . prototype . i svi si bl e = _LBL_i svi si bl e ; 

_Label .prototype. show = _LBL_show; 

_Label .prototype, hide = „LBL_hide; 

_Label .prototype. getcapti on = _LBL_getcaption; 

_Label , prototype, setcapti on = _LBL_setCaption; 

_Label .prototype. getDataFormatAs = _LBL_getDataFormatAs; 

„Label , prototype. setDataFormatAs = _LBL_setDataFormatAs; 




„Label .prototype. setDataSource = „LBL_setDaxabourc 
_Label -prototype. getDataFi eld = _LBL_getDataField; 
_Label . prototype, setDataFi eld = _LBL_setDataField; 
_Label .prototype, display = _LBL_display; 

//private methods 

„Label .prototype. _fireEvent = _EM fireEvent; 

_Label .prototype. _preservestate = _lbl preservestate; 

_Label .prototype. _restoreState = _LBL restorestate; 

_Label .prototype. _hasstate = „LBL_hasState; 
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_Labe1 .prototype. „onrowenter = _LBL — onrowenter; 

//scope implementation in _LBL_Prototype function 

function _LBL_isvisibleO 

{ return this._bvisib1e; } 

function _LBL_showO 

{ this.„bvisible = true; } 

function „LBL_hideO 

{ this,_bvisible = false; } 

function _LBL_getcaptionO 

{ return this._strCaption; } 

f uncti on _LBL„setCapti on (strCapti on) 

{ this-.strcaption = strCapti on; } 

function _LBL_getDataFormatAsO 

{ return this._dataFormatAs; } 

function __LBL_setDataFormatAsCst rvalue) 

var strFormat = string(strvalue) ; 

strFormat = strFormat .toLowerCaseC) ; 

if (strFormat == 'text' M strFormat == 'html') 

^ this.„dataFormatAs = strFormat; 

return true; 

" - } 

return false; 

} 

function _LBL_getDataSourceO 

{ return this._objDataSource; } 

function _LBL_setDataSource(objDataSource) 

^ if (typeof (objDataSource) 1= 'object') 

return false; . n ^ . , 

if ((this,_objDataSource != null) && Cthis._strDataField != )) 

thi s .„objDataSource . unadvi se(thi s -_rowEnterlD) ; 
this._obiDatasource = ObjDataSource; . 
if ((this-_objDataSource != null) && (this._strDataField != )) 

this._rowEnterlD = this._objDataSource.advise(RS„0NROWENTER, 
this. id + ' ...onrowenter (' + this.^objDataSource.id +',"'+ thi s.„strDataField + 
"');*); 

return true; 

} 

function „LBL„getDataField() 

{ return this._strDataField; } 

f uncti on _LBL_setDataFi el d (st rDataFi el d) 

^ if ((this._objDataSource != null) && (thi s._st rDataFi eld != ")) 

thi s .^objDataSource . unadvi se(thi s ._rowEnteriD) ; 
this._strDataFie1d = strDataField; . 
if ((this.„objDataSource !- null) && (this._strDataField != )) 

this,„rowEnterlD = this.„objDataSource.advise(RS_ONROWENTER, 
this.id + ' .^onrowenterC + this.„objDataSource.id +','"+ thi s._st rDataFi eld + 
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return true; 

} 

function _LBL_displayO 

if Cthis._bvisib1e) 

var strHTML = this._strCaption; 
if (this._dataForniatAs == 'text') 

StrHTML = Server. HTMLEncode(strHTML) ; 
Response.wri te(strHTML) ; 

return this.^preserveStateC) ; 

} 

function _LBL preserveStateO 

if (this.maintainState) 
{ // preserve state in hidden field 

var state = new object; 
if (!this._bvisible) 

state. _bvi si ble = false; 
if (this._dataFormatAs != 'text') 

state. „dataFormatAs = this._dataFormatAs; 
state. _strcapti on = this._strCaption; 
return thi sPage . persi ststate (thi s . name , state) ; 

} 

return false; 

} 

fuftction _LB! restoreStateC) 

r 

thi s ._f i reEventCthi s ._funclni t) ; 
if (this.maintainState) 

^ var state = thi sPage.unpersiststate(this. name) ; 

if (state != null) 

if (state. „bvi si ble != null) _ 
this.„bvisible = (state._bvisible !- '0' && 

state. _bvi si ble != 'false'); 

else 

this.3visible = true; 

if (state. _dataFormat As != null) 

this.„dataFormatAs = state. _dataFormatAs; 

else , , 

this._dataFormatAs = 'text'; 

this._strCaption = state. _strcapti on; 
return true; 

^ } 
return false; 

} 

function „LBL hasStateO 

if (this.maintainState) 

return thi sPage . i sStatePersi sted (thi s . name) ; 
return false; 

} 
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// eventhandler for databinding 

function _LBL onrowenter(ob jRecordset , strDataFi eld) 

^ this. setCaptionCobjRecordset. fields. getValue(strDataField) + "); 

} 

} // end of _LBI Prototype function 

</SCRIPT> 
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// Microsoft Script Library<BR> 

// visual interDev 6.0 Label Object for dhtml<br> 

// copyright 1998 Microsoft Corporation. All Rights Reserved. <BR> 

// <B>Do not modify in design view. Switch to source view.</B><BR> 

// <SCRIPT> 

f uncti on createLabel (st rName , f uncini t , ob j Parent) 

^ if (typeof(strName) != 'string' || strName == ") 

return null ; 

var strTag = '<SPAN id="' + strName + name='" + strName + •"></SPAN>'; 

if ((typeof Cob j Parent) = 'object') && (objParent != null)) 
obj Parent . i nsertAd j acentHTML ( ' Bef oreEnd ' , strTag) ; 

else 

document. writeCstrTag) ; 

var obj Label = eval (strName) ; 
if (typeof (obj Label) != 'object') 
return null ; 

obj Label .hide = _LBL„hide; 
obj Label .show = _LBL_show; 
obj Label . i svi si bl e = „LBL_i svi si bl e ; 
obj Label -getcapti on = _LBL_getCaption; 
obj Label .setcapti on = _LBL_setCaption; 
obj Label .getDataFormat AS = „LBL_getDataFormatAs; 
obj Label -setDataFormatAs = __LBL_setDataFormatAs; 
- ' " ^ obj Label -getDataSource = _LBL_getDataSource; 

trbj Label .setDataSource = _LBL_setDataSource; 
obj Label .getDataFi eld = _LBL_getDataField; 
obj Label -setDataFi eld = _LBL_setDataField; 
obj Label .advise = „LBL„advise; 
obj Label .unadvise = _LBL_unadvise; 
obj Label .display = _LBL_di splay; 

//private members 

obj Label ._objEventManager = null; 

obj Label .„objDataSource = null; 

obj Label ._strDataFi eld = 

obj Label .„dataFormatAs = 'text'; 

obj Label ._fireEvent = _LBL fireEvent; 

obj Label .„fi reEvent(f uncini t) ; 
return obj Label ; 

} 

function _LBL_isvisible() 

{ return (this. style. visibility != 'hidden'); } 

function _LBL_hide() 

{ this. styl e . vi si bi 1 i ty = 'hi dden ' ; } 

function _LBL_show() 

{ this. style. visibility = 'visible'; } 

function _LBL_getCaption() 

if (this.„dataFormatAs == 'html') 
return this.innerHTML; 

else 
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return thi s.innerText; 

} 

f unct i on _LBL„setCapti on (s t rCapti on) 

^ if (this._dataFormatAs 'htmT) 

this.innerHTML = strCaption; 

else 

thi S.innerText = strCaption; 

} 

function _LBL_getDataFormatAs() 
{ return this._dataFormatAs ; } 

function _LBL_setDataFormatAsCst rvalue) 

^ var strFormat = string(strvalue) ; 

strFormat = strFormat .toLowerCaseC) ; 
if (strFormat == 'text' ll strFormat 'html') 

^ var StrCaption = this.getCaptionQ ; 

this.„clataFormatAs = strFormat; 
this.setCaptionCstrCaption) ; 

if (this._objDataSource != null && this._strDataField 1= ) 

this.dataFormatAs = this._dataFormatAs; 
return true; 

return false; 

} 

function rLBL_getDataSource() 
{ return this._objDataSource; } 

function _LBL_setDataSourceCobjDataSource) 

^ if (typeof (objDataSource) N 'object') 

return false; 

if ((this._objDataSource != null) && (this-_strDataField != ")) 

^ if (this._objDataSource.isDHTMLAwareO) 

this.datasrc = 
this.dataFld = 

} 

thi s ._obj DataSource . unadvi seCthi s . _rowEnterlD) ; 

} 

if C (thi s._obj DataSource == null) |1 (objDataSource != null && 
thi s._obj DataSource. id != objDataSource. id)) 

if (this-„objDataSource != null) 

thi s ._objDataSource . unadvi se(thi s ._af terOpeniD) ; 

this._afterOpenlD = objDataSource.advi se(RS„ONAFTEROPEN, this. id + 
' .setDataSourceC + objDataSource. id + ');'); 
} 

this.„objDatasource = obiDataSource; . 

if ((objDataSource != null) && (this.„strDataField != )) 

^ if (objDataSource. isDHTMLAwareO) 
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this.datasrc = + objDataSource.getDHTMLDataSourceiD() ; 
this.dataFld = this._strDataFie1d; 
this.dataFormatAs = this._dataFormatAs; 

} 

else 

this._rowEnteriD = objDataSource.advise(RS_ONROWENTER, 
'„LBL onrowenterC + objDatasource.id + \ ' + this. id +',"'+ this.„strDataField 

-f '");'); 

} 

return true; 

} 

function _LBL„getDataField() 

{ return this._strDataField; } 

f uncti on _LBL_setDataFi el d (st rDataFi el d) 

^ if (Cthis._objDataSource != null) && (this._st rDataFi eld != ")) 

i f (thi s ._objDataSource . i sDHTMLAwareO) 

this.datasrc = " ; 
this.dataFld = " ; 

} 

else 

thi s .^objDataSource . unadvi seCthi s ._rowEnterlD) ; 

this._strDataField = strDataField; 
. . , ...jf (Cthis-„objDataSource !- null) && Cthis.„strDataField != ")) 

if (thi s._objDataSource.i SDHTMLAwareO) 

this.datasrc = + 
thi s . _ob j Datasou rce . getDHTMLDataSou rcelD () ; 

this.dataFld = strDataField; 
this.dataFormatAs = this._dataFormatAs; 

} 

this._rowEnteriD = this._objDataSource.advise(RS_ONROWENTER, 

'_LBL onrowenterC + this.„objDataSource.id + ' + this. id strDataField 

+ '");'); 
} 

return true; 

} 

f uncti on _LBL„advi se(str Event , f uncTocal 1 ) 

if (this.^objEventManager == null) 

this._objEventManager = CreateEventManagerQ ; 
var nAdviselD = this.„objEventManager.advise(strEvent,funcToCall) ; 
if (nAdviselD != -1) 

evalC'this.' + strEvent + ' = _LB! — fi reEvent ; ') ; 
return nAdviselD; 

} 

function _LBL_unadviseCstrEvent, nAdviselD) 

if (this.„objEventManager != null) 

retu rn thi s . _ob j EventManager . unadvi se (st rEvent , nAdvi selD) ; 
return false; 

} 
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function _LBL_displayO 
{ } 

function „LBL fi reEvent(funcToFi re) 

^ if (typeofCfuncToFire) == 'undefined') 

^ if (this._objEventManager != null) 

this._objEventManager.fi reEventC on' + window. event. type) 

} 

else 

_EM fi reEventCfuncToFi re) ; 

} 

function _LBL onrowenterCobjRecordset ,objLabel ,strDataField) 

^ objLabel .setcapti on (objRecordset.fi elds. getvalueCstrDataFi eld) + "); 

} 
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<SCRIPT RUNAT=:SERVER LANGUAGE=" JavaScri pt"> 

11 ju ^ J; J. * * * ■it'U'kit'ii'k'kit^A-k'it'k'it'kit'iiit'k-ii'k'k'itit-kit''^'itii it it it it it it it it it it it it it it it it it it it it it it it it it it it it it i: it it i: ic it 

II Microsoft Script Library 

// visual interDev 6.0 Listbox Object for ASP 

// Copyright 1998 Microsoft corporation. All Rights Reserved. 

1 1 ii ^ ic it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it ^ 

f uncti on CreateLi stbox (st rName , f uncini t , ob j Parent) 

if (typeof (strName) == 'string' && strName != 

^ var obj Li stbox = new _Li stbox(strName,obj Parent) ; 

eval (strName + * = objLi stbox' ) ; 

ob j Li stbox. _f uncini t = funclnit; 

thisPage.advise(PAGE„ONlNlT, StrName + ' ._restoreStateO ); 
return obj Li stbox; 

} 

return null ; 

} 

function _Li stbox(strName,objParent) 

^ if (typeof CbLBPrototypeCalled) 'undefined') 
_LB PrototypeO ; 

// public members 
this. id = StrName; 
this, name == strName; 

- ~ : -r-y^ pp^-y^^Q members 

'rhis.„options = new Array; 
this._objEventManager = CreateEventManaqerO ; 

thi s .„obj EventManager . advi seDef aul tHandl er (thi s . name , LB_ONCHANGE) ; 



function _LB PrototypeO 

_bL8PrototypeCalled = 1; 
//events 

LB_ONCHANGE = 'onchange'; 
// public members 

_Li stbox. prototype, disabled = false; 
_Li stbox. prototype. size = 1; 
_Li stbox. prototype. selectedindex = -1; 
_Li stbox. prototype, maintainstate = true; 

// private members 
__Listbox. prototype. _bvi si ble = true; 
„Li stbox. prototype. _objRowSource = null; 
_Li stbox. prototype. _objDataSource = null; 
_Li stbox. prototype, __strDataFi eld = ''; 

//public methods 

_Listbox, prototype, isvi si ble = _LB_isVisible; 

_Li stbox. prototype, show = „LB_show; 

_Li stbox, prototype. hide = _LB_hide; 

_Li stbox. prototype. addltem = _LB_addltem; 

__Li stbox. prototype, removeltem = _LB_removeltem; 

„Listbox, prototype. clear = _LB„clear; 

„Li stbox, prototype. getcount = _LB_getCount ; 

_Li stbox. prototype. getvalue = „LB„getValue; 
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Li stbox. prototype. setvalue = „LB_setvalue; 

Li stbox. prototype. getText = _LB„getText; 

Li stbox. prototype. setText = _LB„setText; 

Li stbox. prototype. selectByValue = __LB„selectByValue; 

Li stbox. prototype. selectByText _LB_selectByText ; 

Li stbox. prototype. get Rowsource = _LB_getRowSource; 

Li stbox. prototype. setRowSource = _LB_setRowSource; 

Li stbox. prototype. getDataSource = „soM„getDatasource; 

Li stbox. prototype. setDataSource = _SOM_setDataSource; 

Li stbox. prototype. getDataFi eld = _SOM_getDataFielcl; 

.Li stbox. prototype. setDataFi eld = _SOM_setDataField; 

.Li stbox. prototype. advise = _LB„advise; 

.Li stbox. prototype. unadvise = _LB_unadvise; 

.Li stbox. prototype. display = „LB„di splay; 



//private methods 

_Li stbox. prototype. _f i reEvent = _EM fireEvent; 

„Li stbox. prototype. _preservestate = _LB preservestate; 

_Li stbox. prototype. _restoreState = _LB restorestate; 

_Li stbox. prototype. „hasstate = „LB hasstate; 

_Li stbox. prototype. _onrowenter - _LB onrowenter; 

_Li stbox. prototype. _onbeforeupdate = _LB onbeforeupdate; 

//scope implementation in „LB Prototype function 

function _LB optionQ 

this. text = * ' ; 
this. value = ' ' ; 

function _LB_isVisible() 

{ return this.„bvisible; } 

function _LB__show() 

{ this._bvisible = true; } 

function _LB_hide() 

{ this.„bvisible = false; } 

f uncti on „LB_addltem(st rText , val ue , nindex) 

var ncount = this.getCountQ ; 

if (typeof (value) == 'undefined') 

value = strText; 
if (typeof (nindex) 'undefined") 

nindex = nCount; 
if (!isNaN(parselnt (nindex))) 
{ // add item at given nindex 

var opt = new _LB Option; 

opt. text = String(strText) ; 

opt. value = value; ..... 
if (nindex < 0) // add as first item in list 

nindex = 0; 
if (nindex < nCount) 
{ // insert item at given index 

var aTemp = this._options.slice(nlndex) ; 

this._options. length = nindex; 

this._options [Number (nindex)] = opt; 

this.^options = thi s._options.concat (aTemp) ; 

return nindex; 
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else 

{ // add item to end of list 

this._options[nCount] = opt; 
return nCount; 

} 

return -1; // failed to add item 



function _LB„removeltem(nindex) 

if (typeof (nindex) == 'undefined') 

nindex = this.selectedlndex; 
if (lisNaNCparseint (nindex)) && nindex >= 0 && nindex < 

this.getcountQ) 

{ // remove item at nindex 

var aTemp = this.„options.5lice(Number(nlndex)+l) ; 
this.^options. length = nindex; 
this.„options t hi s.^options.concat (aTemp) ; 
return true; 

} 

return false; 

} 

function _LB_clear() 

this.selectedlndex = -1; 
this. .options. length = 0; 

} 

- - ^ " " function _LB„getCount() 

^ return this. .options. length; } 

function __LB_getValue (nindex) 

if (typeof (nindex) == 'undefined') 

nindex = this.selectedlndex; 
if (!isNaN(parselnt(nlndex)) && nindex >== 0 && nindex < 

this.getCountO) , , . r ^ -i n 

return thi s ..options [nindex] .value; 

return ' ' ; 

} 

f uncti on _LB_setVal ue(val ue , nindex) 

if (typeof (nindex) == 'undefined') 

nindex = this.selectedlndex; 
if (!isNaN(parselnt (nindex)) && nindex >= 0 && nindex < 

this.getCountO) 

this -.options [nindex] .value = value; 
return true; 

return false; 

} 

function _LB„getText (nindex) 

if (typeof (nindex) == 'undefined') 

nindex = this.selectedlndex; 
if (!isNaN(parselnt (nindex)) && nindex >= 0 && nindex < 

this.getCountO) 

return this. .options [nindex] .text; 
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return 



function _LB_setText(strText , nindex) 

if (typeof (nindex) == 'undefined') 

nindex = this.selectedlndex; 
if C!isNaN(parselnt (nindex)) && nindex >= 0 && nindex < 

this.getCountO) 

this. _options[nlndex] .text = String(strText) ; 
return true; 

return false; 

} 

f uncti on „LB_sel ectSyText (st rrext) 

{ // check for match in ^options array 

for (var i=0; i < this. _options. length; i++) 

^ if (string(strText) this.„options[i] .text) 

this.selectedlndex = i; 
return i ; 

} 

} 

return -1; 

} 

function _LB_selectByvalue(va1ue) 
- ' ' "^^{ - // check for match in ^options array 

for (var i=0; i < this._options. length; i++) 

if (value == this.„options[i] .value) 

this.selectedlndex = i; 
return i ; 

} 

} 

return -1; 

} 

function _LB„getRowSource() 

{ return this.„objRowSource; } 

f uncti on „LB_setRowSource(obj Recordset , 1 i stFi el d , boundFi el d) 

^ if (typeof(objRecordset) -= 'object' && this.getCountO == 0) 

var nPos = obj Recordset .absolutePositi on; 

this._objRowSource = obj Recordset ; 

obi Recordset. moveFi rst() ; 

while (! obj Recordset .EOF) 

{ 

thi s . addltem(ob j Recordset . f i el ds . getval ue (1 i stFi el d) , obj Recordset . f i el ds . getval ue (bo 

undField)); ... 

ob] Recordset .moveNextO ; 

obj Recordset . moveAbsol ute(nPos) ; 
return true; 

} 

return false; 
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} 

function _LB_advise(strEvent ,funcToCall) 

{ return this.„objEventManager,adviseCstrEvent ,funcToCan) ; } 

function „LB_unadvise(strEvent ,nAdviselD) ^ 

{ return this._objEventManager.unadvise(strEvent ,nAdviselD) ; } 

function „LB_displayC) 

if (this._bvisible) 
{ 

var strHTML; 

if (this. disabled && IthisPage.isDHTMLBrowserO) 
{ // mimic disabled for non-DHTML browsers 

StrHTML = *<TABLE border=l bordercolor=#808080 
bordered ordark=#696969 bordercolorlight=#COcOcO cenpadding=0 
censpacing=0><TR><TD>\n' ; , ^ ^ n n 

StrHTML '<TABLE border=0 cenpadding=0 - 

cellspacing=0>\n' ; ..... 

if (this. size <= 1) 

{ // mimic a disabled dropdown 

StrHTML += '<TR><TD width^30>'; 
if (this.selectedindex >= 0 && 

this.selectedlndex < this.getCountQ) ^ononon 

StrHTML += '<FONT col or=#808080 
size=2>  ' + Server. HTMLEncode(this.getText()) + '    ' ; 

StrHTML '</TD><TD width=15 

bg col o r=#808 080>&n b s p ; </TD></TR> j 

' else 

{II mimic a disabled list 

for (var i=0; i < this. size; i++) 

StrHTML += '<TR>' ; 

if (i < this._options. length) 

if (this.selectedindex = i) 
StrHTML += '<TD 

width=30 bgcolor=#696959><FONT color=#COCOCO>  ' + 

server. HTMLEncode(this.„options[i] -text) + '   </TD> ; 

else 

StrHTML += '<TD 

width=30><FONT color=#696969>  • -f Server .HTMLEncode(this. .options [i] .text) + 
'   </TD>' ; ^ 

else 

StrHTML += '<TD 

width=30> </TD>' ; 

StrHTML += '</TR>\n' ; 

} 

StrHTML += *</TABLE></TD></TR></TABLE>\n' ; 

} 

else 

^ StrHTML = + 'SELECT name=' + this. name + ' id=' 

+ this. id + ' size=* + this. size; 

if (! this. disabled) 

{ // output client events to callback to 

server 

var strHandler = 

thi s . _ob j Even tManager . generated i entHandl ers (thi s . name) ; 
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strHTML += strHandler; 

} 

else 

StrHTML += ' disabled'; 
StrHTML += '>\n' ; ^ ■ ^ 

for Cvar i=0; i < this._options. length; 
{ // generate __options 

StrHTML += + 'OPTION '; 

if (this.selectedlndex == i) 

StrHTML += 'selected '; 

StrHTML += 'value="' + 
server. HTMLEncodeCthis.„options[i] .value) + + ^ , 

server. HTMLEncode(this.„options[i] .text) + </OPTlON>\n ; 

StrHTML += '</SELECT>\n' ; 

Response .wri te(st rHTML) ; 

this.__preserveStateC) ; 

} 

function _LB preserveStateQ 

^ if (this.maintainstate) ^. -.^ 

{ // preserve state in hidden field 

var state = new Object; 
if (!this.„bvisible) 

state. „bvi si ble = false; 
if (this. disabled) 

state. disabled = true; 
' * ^* - if (this. size 1) 

— state -size = this -size; 

state. select edindex = this.selectedlndex; 
state. jcount = this._options .length; ^ 
for (var i=0; i < this. .options. length; i++) 

^ stateE'f + i] = this.„options[i] .text; ^ 

if (this._options[i]. value !- thi s ._options[i] .text) 
state[W + i] = this. _options[i] .value; 



return thi sPage . persi ststate(thi s . name , state) ; 
} 

return false; 

} 

function _LB restoreStateO 

var r = false; 

thi s ._f i reEvent(thi s ._f unclm t) ; 
if (this.maintainstate) 

{ // attempt to restore previous state 

var state = thisPage.unpersistState(thi s.namej ; 

if (state != null) 

{ // restore previous state 

this.clearO ; . ^ 

for (var i-0; i < state. _nCount; i++) 

this.addltem(state['t' + i],state['v' + i]); 
if (state..bvisible != null) ^ . , 

this.3visible = (state. _bvi si ble != '0' && 



state. _bvi si ble != 'false'); 



else 

this._bvisible = true; 
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if (state.disabled != null) 

this. disabled = (state.disabled != 0 && 

state.disabled 1= 'false'); 

else 

this. disabled = false; 

if (state. size != null) 

this. size = Number(state. size) ; 

else 

this. size = 1; 

this.selectedlndex = Number(state. selectedlndex) ; 
r = true; 

} 

van newState = Request. Form(this. name) + "; 
if (newState != 'undefined') 

thi s . sel ectByVal ue(newState) ; 
return r; 

} 

function _LB hasStateO 

if (this.maintainState) 

return thi sPage . i sStatePersi sted (thi s . name) ; 
return false; 

} 



// eventhandler for databinding 
function _LB onrowenter(objRecordset ,dataField) 



— this. selectByValue(objRecordset. fields. getvalue(dataField) + ''); 

return true; 

} 

// eventhandler for databinding 

f uncti on _LB onbef oreupdate (ob j Recordset , dataPi el d) 

^ ob j Recordset . f i el ds . setval ue(dataFi el d , thi s , getval ue ()) ; 

return true; 

} 

} // end of _LB Prototype function 

</SCRIPT> 
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1 1 J; V- A. ****** ********* " 

// Microsoft Script Library<BR> 

// Visual interDev 6.0 Listbox Object for DHTML<BR> 

// copyright 1998 Microsoft Corporation. All Rights Reserved. <BR> 

// <B>Do not modify in design view. Switch to source view.</B><BR> 

II J; j-^jfj^-vr ********************************* ^'^ 

// <SCRIPT> . . . . ^ 

f uncti on CreateLi stbox (st rName , f unclm t , ob] Parent) 

^ if Ctypeof (strName) != 'string' M st rName == ") 

return null ; 

// create SELECT tag in document ^ 

var strTag - '<SELECT name="' + strName + id= ' + strName + 

Size=l></SELECT>* _ , . 

if C(typeof(obj parent) 'object') && (objParent 1= null)) 
ob j Parent . i nsertAdj acentHTMLC Bef oreEnd ' , strTag) ; 

else 

document. wri teCstrTag) ; 

var obj Select = document .all [strName] ; 
if (typeof (obj Select) != 'object') 

return null ; „ . ■ .. i^ 

var bNameExists = eval ("typeof (' + strName + ) == object 
if (! bNameExists) 

eval (strName + ' = objselect'); 

//events 

LB_ONCHANGE = 'onchange' ; 

- ■ 'T // intrinsic properties 

y/ name AND id RO 

// disabled RW 

// size RW 

// selectedlndex RW 

// extended methods 

obj Sel ect . i svi si bl e = „LB_i svi si bl e ; 
obj select. show = _LB_show; 
obj sel ect. hide = _LB„hide; 
objselect.addltem = _LB_addltem; 
objselect.removeltem = _LB„removeltem; 
obj Sel ect. clear = _LB_clear; 
objselect.getcount = _LB_getCount; 
objselect.getvalue = „LB„getvalue; 
objselect.setvalue = „LB„setvalue; 
objSelect-getText = _LB_getText; 
objselect.setText = „LB„setText; 
objselect.selectByvalue = „LB„selectByvalue; 
objSelect.selectByText = _LB„selectByText ; 
objSelect.getRowSource = _LB_getRowSource; 
objSelect.setRowSource = _LB_setRowSource; 
objSelect.getDataSource = _LB_getDataSource; 
objSelect.setDataSource = _LB_setDataSource; 
objSelect.getDataField = „LB_getDataField; 
objSelect.setDataField = _LB_setDataFi el d ; 
obj Sel ect. advise = _LB_advise; 

objSelect.adviseDefaultHandler = _LB„adviseDefaultHandler; 
objselect.unadvise = _LB„unadvise; 
objsel ect. display = _LB„di splay; 



//private members 
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objSelect._objRowSource = null; 
objSelect._objDataSource = null; 
objSelect.^dataField = 
objSelect,_fireEvent = _LB fireEvent; 

// advise for default eventhandl ers 
obiSelect.^objEventManager = createEventManagerQ ; 

objSelect.„fireEvent('„LB onbeforefuncinitC^ + obj Select. id + ) 

objselect.„fi reEventCfuncinit) ; 
return objselect; 

} 

function „LB_isvisibleO ..... 

{ return (this. style. visibility != 'hidden ); } 

function _LB„showC) ..... 

{ this. style. visibility = 'visible ; } 

function _LB„hideO ...... 

{ this. style. visibility = 'hidden'; } 

f uncti on „LB„addltem(st rText , val ue , nindex) 

^ var ncount this.getcountC) ; 

if (typeof (value) == 'undefined') 

value = strText; 
if (typeof (nindex) == 'undefined') 

nindex = nCount; 
if (!isNaN(parselnt(nlndex))) 
{ // add item at given nindex 

var opt = document. createElementC OPTION ); 
— opt, text = String(strText) ; 

opt, value = value; ^, . . - ^ 

if (nindex < 0) // add as first item in list 

nindex = 0; 
if (nindex < nCount) 
{ // insert item at given index 

thi s . add (opt , nindex) ; 
return nindex; 

} 

else .... 
{ // add item to end of list 

this. add (opt) ; 

return nCount; 

} 

return -1; // failed to add item 

} 

function „LB_removeltem(nlndex) 

^ if (typeof (nindex) == 'undefined') 

nindex = this.selectedindex; 
if (!isNaN(parseint (nindex)) && nindex >= 0 && nindex < this.getCountO) 
{ // remove item at nindex 

this.options. remove(nlndex) ; 

return true; 

return false; 

} 

function „LB„clear() 

{ this. options. length =0; } 
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function _LB„getCount() 

{ return this. options .length; } 

function _LB.getvalue(nlndex) 

^ if (typeof (nindex) == 'undefined') 

nindex = this. selectedlndex; 
if (lisNaNCparselnt (nindex)) && nindex >= 0 && nindex < this.getCountQ) 

return this.itemCNumber (nindex)) .value; 
return ' ' ; 

} 

f uncti on _LB_setval ue (val ue , nindex) 

^ if (typeof (nindex) 'undefined') 

nindex = this.selectedindex; ... 
if (!isNaN(parselnt(nlndex)) && nindex >= 0 && nindex < this.getCountO) 

^ this. item(Number(nlndex)) .value = value; 

return true; 

return false; 

} 

function _LB_getText (nindex) 

^ if (typeof (nindex) 'undefined') 

nindex = this.selectedindex; . , . /-nn 

if (!isNaN(parseint(nindex)) && nindex >= 0 && nindex < this.getCountO) 
- • ' - return this.item(Number (nindex)) .text; 
return ' ' ; 

} 

function _LB„setText(strText, nindex) 

^ if (typeof (nindex) == 'undefined') 

nindex = this.selectedindex; , . . 

if (!isNaN(parselnt(nlndex)) && nindex >- 0 && nindex < this.getCountO) 

^ this. item(Number(nlndex)). text = String(strText) ; 

return true; 

} 

return false; 

} 

function _LB_selectByvalue (value) 

^ for (var i=0; i < this.getCountO ; i++) 

^ if (value === this. options(i) .value) 

^ this.selectedindex = i; 

return i ; 

} 

} 

return -1; 

} 

function „LB_select8yText(5trText) 

^ for (var i=0; i < this.getCountO; i++) 

{ 
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if (strText == this. optionsCi) -text) 

this.selectedlndex = i; 
return i ; 

} 

} 

return -1; 

} 

function _LB„getRowSourceO 

{ return this._objRowSource; } 

f uncti on „LB_set RowSou rce (ob j Recordset , 1 i st Fi el d , boundFi e^ d) 

^ if Ctypeof (obi Recordset) =^ 'object' && this.getCountQ == 0) 

{ // only allow setting one lookup source to be consistent with server 

var nPos = objRecordset.absolutePosition; 
this.„objRowSource = objRecordset ; 
obj Recordset .movePi rstQ ; 
while (! objRecordset. EOF) 

var obj Fields = objRecordset. fields; 

thi s . addltemCob j Fi el ds . getval ue (1 i stFi el d) , obj Fi el ds . getval ue (boundFi eld)); 

obj Recordset . moveNext () ; 

obj Recordset . moveAbsol ute (nPos) ; 
return true; 

} 

return false; 
function „LB_getDataSource() 

{ return this._objDataSource; } 

function _LB_setDataSource(objDataSource) 

^ if (typeof (objDataSource) != 'object') 

return false; 

if ((this.„objDataSource != null) && (this._dataField [- ")) 

if (thi s .„objDataSource . i sDHTMLAwareO ) 

this.datasrc = " ; 
this.dataFld = " ; 



} 

else 
{ 



} 

} 



thi s ._objDataSource . unadvi se(thi s ._rowEnterlD) ; 
thi s ..ObjDataSource . unadvi se(thi s ._rowExi tiD) ; 



if ((this.„objDataSource null) || (objDataSource != null && 
this._objDataSource.id != objDataSource. id)) 

if (this._objDataSource != null) 

thi s ._objDataSource. unadvi se(thi s ._afterOpeniD) ; 

this.^afterOpenlD = objDataSource.advise(RS„ONAFTEROPEN, this. id + 
' .setDataSourceC + objDataSource. id + ');'); 
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this._objDataSource = objDatasource; 

if ((objDatasource != null) && (this._dataField i= 

if (objDatasource. isDHTMLAwareO) 

^ this.datasrc = + objDatasource. getDHTMLDataSourcelD() ; 

this.dataFld = this._dataField; 

} 

else 

^ this._rowEnterlD = objDataSource.advise(RS„ONROWENTER, 

'_LB_onrowenterC + objDatasource. id 4- ' , ' + this. name thi s._dataField + 

' ' this.^rowExitlD = objDatasource. advi se(RS„ONROWEXlT, 

'_LB_onrowexitC + objDatasource. id + ' + this. name this._dataField + 

} 

return true; 

} 

function _LB_getDataFie1d() 

{ return this..dataField; } 

f uncti on „LB_setDataFi el d (dataFi el d) 

^ if ((this._objDataSource != null) && (this.„dataField != ")) 

if (this. .objDatasource. isDHTMLAwareO) 

this.datasrc = " ; 
this.dataFld = " ; 



} 

else 
{ 



thi s ..objDatasource . unadvi se(thi s ._rowEnterlD) ; 
thi s ..objDatasource . unadvi se(thi s ..rowExi tiD) ; 



} 



this. .dataFi eld = dataField; , .... 

if ((this. .ObjDatasource != null) && (this.. dataFi eld != )) 

^ if (this..objDataSource.isDHTMLAware()) 

this.datasrc = + 
this.. objDatasource, getDHTMLDataSourceiDO ; 

this.dataFld = dataField; 

} 

else 

^ this.„rowEnterID = this..objDataSource.advise(RS_ONROWENTER, 

'.LB_onrowenterC + this. .objDatasource. id + ' + this. name +',"'+ dataField + 

' this._rowExitlD = this..objDataSource.advise(RS.ONROWEXIT, 

•.LB_onrowexit(' + this. .objDatasource. id + ' + this. name dataField + 

} 

return true; 

} 
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f uncti on _LB_advi se (st rEvent , f uncTocal 1 ) 

^ van nAdviselD = this._objEventManager.advise(strEvent ,funcToCan) ; 

if (nAdviselD != -1) 

evalC'this.' + st rEvent + ' _LB fireEvent; ); 

} 

function _LB_.adviseDefaultHandler(strName,st rEvent) 
var nAdviselD = 

thi s ,„ob j EventManager . advi seDef aul tHandl er (st rName , st rEvent) ; 
if (nAdviselD != -1) 

eval("this." + st rEvent + " = _LB_fi reEvent ; ); 

} 

f uncti on _LB„unadvi se (st rEvent , nAdvi selD) 

^ return thi s._obj EventManager .unadvise(strEvent, nAdviselD) ; 

} 

function „LB_display() // do nothing for DHTML case 

{ } 

function _LB fi reEvent(funcToFi re) 

^ if (typeof (f uncToFi re) == 'undefined') 

^ if (thi s.„obj EventManager != null) 

thi s.„obj EventManager. fireEvent Con' + wmdow.event .type) ; 

} 

* * *"e>5e 

__EM f i reEvent(f uncToFi re) ; 

} 

f uncti on „LB on rowent er (ob j Recordset , ob j Li stbox , dataFi el d) 

^ objListbox.select(objRecordset. fields. getvalue(dataField) + "); 

return true; 

} 

f uncti on _LB on rowexi t (ob j Recordset , ob j Li stbox , dataFi el d) 

^ var sel value = objLi stbox. getval ue() ; 

if (sel value != null && sel value != 'undefined') 

ob j Recordset . f i el ds . setval ue(sel val ue) ; 
return true; 

} 

function _LB onbef or ef unci nit(obj Li stbox) 

{ objLi stbox. advi seDefaul tHandl er(obj Li stbox. id, lb_ONCHANGE) ; } 
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II Microsoft script Library<BR> 

// visual interDev 6.0 Miscellaneous utility functions for dhtml<br> 
// copyright 1998 Microsoft Corporation. All Rights Reserved. <BR> 
// <B>Do not modify in design view. Switch to source view.</B><BR> 

// function cl osu re (obj , method) 

// creates a closure object for encapsulating a function of an 

function closure(obj , method) 
return functionO 

var params = var i ; 

for (i = 0; i < (arguments. length - 1); i++) 
{ params += arguments [i] + } 

if (i < arguments. length) 

{ params += arguments [i ] ; } 



} 



}; 



with (obj) ^„ 

return eval(method + "( + params + ) ); 



II funcrfon TypeOf (x) 

// Returns a string indicating the type of given variable x. 

// This is a specialized implementation of the native typeof 

// function which differentiates date and array objects. 

// Returns "undefined", "function". "string" /'boolean" 

// "number", "object", "array", or "date^ 

function TypeOf (x) 

var t = typeof (x); 

if (t == "object" && X != null) 

^ if (typeof (x. constructor) != "undefined") 

^ var ctor = new string(x. constructor) ; 

var chstart = ctor. indexof ("function") ; 
var chEnd = ctor .indexof ("(") ; 
if (chstart != -1 && chEnd != -1) 

^ ctor = ctor, substring(chStart+9, chEnd) ; 

if (ctor == "Array" 11 ctor "Date" 1 1 ctor 
"string" M ctor -= "Number" || ctor == "Boolean") 

t = ctor.toLowercaseO ; 

} 

} 

} 

return t; 

} 
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// function QuickDictionaryQ 

// A quick and dirty implementation of a dictionary. 

j;-^ ^ ^ V- Vf********Vc*Vf *************** ***^f^f**** 

function QuickDictionaryO 

this. diet = new Object; 
this. items = new Array; 

this. count = 0; . . r. -i . ■ 

this. Add = new Function("key" , "item", "this. dict[key] = this. count; 

this. items [this. count] = item; this.count++;") ; 

this. Exists = new Function("key" , "return (typeof (this, diet [key]) != 

\ ^"^^^""IJ^^^^^^g^'^ FunctionC"key", "return this.items[this.dict[key]] ;") ; 

this.RemoveAll = new Function("" , "this. diet = new object; this. items. 1 
= 0; this. count = 0;"); 
} 
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<SCRIPT RUNAT=SERVER LANGUAGE=" JavaScri pt"> 

// Microsoft script Library 

// Visual interDev 6.0 OptionGroup Object for ASP 

// copyright 1998 Microsoft Corporation. All Rights Reserved. 

f uncti on CreateOpti onGroupCst rName , f uncini t , obj Parent) 

^ if (typeof (strName) == 'string' && strName != 

^ var objOptionGroup = new _opti onGroupCst rName) ; 

eval (strName + " = objOptionGroup;"); 
objOptionGroup.„f uncini t = funclnit; 

thi sPage.advise(PAGE_ONiNiT, StrName + ' ._restoreStateC; ); 
return objOptionGroup; 

return null ; 

} 

function _OptionGroupCstrName) 

^ if (typeof CbOPTPrototypeCalled) == 'undefined') 
_OPT Prototype () ; 

// public members 
this. id = StrName; 
this. name = strName; 

// private members 

. -this.^options = new ArrayO; 

ihis.-obiEventManager = createEventManagerO ; 

thi s _obj EventManager . advi seDef aul tHandl er (thi s . name , OPT_ONCHANGE) ; 

} 

function _OPT PrototypeO 

_bOPTPrototypeCalled = 1; 
//events 

OPT„ONCHANGE = 'onchange'; 
// public members 

_OptionGroup.prototype.maintainState = true; 
// private members 

_OptionGroup.prototype,_bvisible = true; 
^OptionGroup. prototype. _nBorder = 0; 
_optionGroup. prototype. „nAlignment = 0; 
_OptionGroup. prototype. _selectedindex =0; 
_OptionGroup. prototype. _objDataS9urce =^null; 
^OptionGroup. prototype. _strDataFi eld = ''; 

//public methods . . -lt 

_OptionGroup.prototype.isVi si ble == _OPT_isVisible; 
_OptionGroup. prototype. show = _OPT_show; 
__OptionGroup. prototype, hide = „OPT_hide; 
_optionGroup. prototype. getBorder = _OPT_getBorder ; 
„OptionGroup. prototype. setBorder = „OPT_setBorder; 
_OptionGroup. prototype. getAlignment = _OPT_getA n gnment ; 
_.Opti onGroup. prototype. setAlignment = _OPT_setAl i gnment ; 
_OptionGroup. prototype. get Button = _OPT_getButton; 
_Opti onGroup. prototype. addltem = _OPT_addltem; 
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_OptionGroup. prototype. removeitem = _OPT„removeltem; 
_OptionGroup. prototype. clear = _OPT_clear; 
_OptionGroup. prototype. getcount = _OPT„getCount ; 
_OptionGroup. prototype. getvalue = _OPT„getValue; 
_OptionGroup. prototype. setvalue = _OPT„setvalue; 
_OptionGroup. prototype. getcapti on = „OPT„getCaption; 
_OptionGroup. prototype. setCapti on = _OPT_setCaption; 
_OptionGroup. prototype. selectByvalue = „OPT_se lectByValue; 
„OptionGroup. prototype. selectByCapti on = _OPT„selectByCaption; 
_OptionGroup. prototype. selectBylndex = _OPT_selectByindex; 
_OptionGroup. prototype. getselectedindex = _OPT_getSelectedindex; 
_OptionGroup. prototype. getRowSource = „OPT_getRowSource 
_OptionGroup. prototype. setRowSource = _OPT„setRowSource 
_optionGroup. prototype. getDataSource = _sOM„getDataSource; 
_OptionGroup.prototype.setDataSource = „SOM„setDataSource; 
„optionGroup. prototype. getDataFi eld = _SOM_getDataF-ield; 
_optionGroup, prototype. setDataFi eld = _SOM_setDataField; 
_OptionGroup. prototype. advise = „OPT_advise; 
„optionGroup. prototype. unadvise = _OPT_unadvise; 
_OptionGroup. prototype. display = _OPT„display ; 

//private methods 

„OptionGroup. prototype. „fireEvent = _EM — nreEvent; 
__OptionGroup. prototype. _preservestate = _OPT — preserveState; 
_optionGroup. prototype. _restorestate = _0PT — restoreState; 
_OptionGroup. prototype. „hasstate = _OPT — hasState; 
_OptionGroup. prototype. _onrowenter = _OPT — onrowenter; 
_OptionGroup. prototype. __onbeforeupdate = _OPT — onbeforeupdate; 

//scope implementation in _OPT Prototype function 

function _OPT OptionQ 

this -text = 
this, value = 
this. disabled = false; 

} 

function _0PT_isVisibleO 
{ return this._bvisible; } 

function _OPT_show() 
{ this.„bvisible = true; } 

function _OPT_hide() 
{ this._bvisible = false; } 

f uncti on _OPT_getBorder C) 
{ return this._nBorder; } 

function __OPT„setBorder(nBorder) 
{ this.„nBorder = nBorder; } 

f uncti on _OPT_getAl i gnment C) 
{ return t hi s._nAli gnment ; } 

f uncti on „OPT_setAl i gnment (nAl i gnment) 

^ if (typeof (nAl i gnment) != 'undefined') 

^ if (nAl i gnment == '0') 

t hi s.^nAli gnment = 0; 

else 
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this,_nAlignment = 1; 
return true; 

^ return false; 

function „OPT„get Button (nindex) 

if (HsNaNCparselntCnindex)) && nindex >= 0 && nindex < 

this.getCountO) 

return this.^options [Number (nindex)] ; 

} 

f uncti on _OPT„addltem (st next , val ue , nindex) 
{ 

var nCount ~ this.getCountO; 

if (typeof (nindex) = 'undefined') 

nindex = nCount; 
if (typeof (value) == 'undefined') 

value = strText; 
if (!isNaN(parselnt(nindex))) 
{ // add item at given nindex 

var opt = new JOPT Option; 

opt. text = String(strText) ; 

opt. value = value; 

if (nindex < 0) // add as first item in list 

nindex = 0; 
if (nindex < nCount) 
{ // insert item at given index 

var aremp = this,_opt ions. si ice (nindex); 
. - : _ this,_options. length = nindex; 

^ this, ..options [NumDer(nlndex)] = opt; 

this.^options = this.„options.concat(aTemp) ; 
return nindex; 

} 

else 

{ // add item to end of list 

this._options [nCount] = opt; 
return nCount; 



} 



^ } 

return -1; // failed to add item 



function „OPT_removeitem(nlndex) 

if (typeof (nindex) == 'undefined') 

nindex = this._selectedlndex; 
if (!isNaN(parselnt(nlndex)) && nindex >= 0 && nindex < 

this.getCountO) 

{ // remove item at nindex 

var aTemp = this._options.slice(Number(nindex)+l) ; 
this.„options. length = nindex; 
this. .options = this.„options.concat(aTemp) ; 
return true; 

} 

return false; 

} 

function „OPT_clearO 

{ this. .options. length =0; } 

function _OPT„getCount() 
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{ return this. .options. length; } 

function _OPT_getvalueCnindex) 

if (typeof (nindex) == 'undefined') 

nindex = this._selectedindex; 
if (MsNaNCparseint (nindex)) && nindex >= 0 && nindex < 

this.getCountO) _ . r . 

return this._options[nlndex] .value; 

return ' ' ; 

} 

function _OPT_setValue (value, nindex) 

if (typeof (nindex) == 'undefined') 

nindex = this._selectedindex; 
if (!isNaN(parselnt (nindex)) && nindex >= 0 && nindex < 

this.getCountO) 

this._options [nindex] .value = value; 
return true; 

return false; 

} 

function _OPT_getCapti on (nindex) 

^ if (typeof (nindex) == 'undefined') 

nindex = this.„selectedindex; 
if (!isNaN(parselnt(nlndex)) && nindex >= 0 && nindex < 

-this.getCountO) , ^ 

^ return this. _options[nlndex] .text ; 

return ' ' ; 

} 

f uncti on _OPT_setCapti on (st rcapti on , nindex) 

^ if (typeof (nindex) == 'undefined') 

nindex = this._selectedlndex; 
if (!i5NaN(parselnt(nlndex)) && nindex >= 0 && nindex < 

this.getCountO) 

^ this. _options[nlndex3 .text = string(strcaption) ; 

return true; 

return false; 

} 

f uncti on _OPT„sel ectByVal ue(val ue) 

{ // check for match in _options array 

for (var i=0; i < this._options. length; i++) 

^ if (value this._options[i] .value) 

this._selectedindex = i; 
return i ; 

} 

} 

return -1; 

} 

f uncti on _OPT_sel ectByCapti on (st rCapti on) 
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{ // check for match in .options array 

for (var i=0; i < this._options. length; i++) 

if (String(strCaption) == this._options[i] .text) 

this._selectedindex = i; 
return i ; 

} 

} 

return -1; 

} 

function _OPT_selectBylndexCnindex) 

^ if (!isNaN(parselntCnlndex))) 

this._selectedlndex = nlndex; 
return nlndex; 

} 

return -1; 

} 

function _0PT_getSelectedlndexO 

{ return this.„selectedlndex; } 

function _OPT_getRowSourceO 

{ return this._objRowSource; } 

f uncti on „OPT_setRowSource(obj Recordset , 1 i st Fi el d , boundFi el d) 

: - if (typeofCobjRecordset) == 'object' && this.getCountQ == 0) 

^ var nPos = objRecordset.absolutePosition; 

ob j Recordset . moveFi r st C) ; 
while (!obj Recordset .EOF) 

obj Fields = obj Recordset. fields; 

thi s . addltemCob j Fi el ds . getval ue(l i st Fi el d) , obj Fi el ds . getval ue (boundFi eld)); 

obj Recordset. moveNextO ; 

obj Recordset . moveAbsol ute (nPos) ; 
return true; 

return false; 

} 

function „OPT„advise(str Event, funcToCall) 

{ return this._objEventManager.adviseCstrEvent ,funcToCa 11; ; > 



function _OPT_unadvise(strEvent,nAdviselD) . 

{ return thi s ._obj EventManager . unadvi se(str£vent , nAdvi selD) ; 

function _OPT_di splay () 

if (this._bvisible) 

^ var strHTML = '<' + 'table border^' + this.^nBorder + ' 

eel lpadding=0 cell spaci ng=0><TR><TD>\n ' ; 

StrHTML += '<' + 'TABLE id="' + this. id + name= + 
this. name + '" border=0 cellpadding=2 cellspacing-2>\n' ; 

if Cthis._nAlignment != '0') 
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StrHTML += '<TR>* ; 

for (var i = 0; i < this._options. length; 

if (this._nAlignment == *0') 

StrHTML += '<TR>* ; 
StrHTML += '<TD>' ; 



! thi sPage . i sDHTMLBrowser ()) 



size=3><b>o</b></FONT>' ; 



if (thi s._options[i] -disabled && 

{ // mimic disabled for non-DHTML browsers 

StrHTML '<FONT face=arial size=2>('; 
if (this.„selectedlndex == i) 

StrHTML += '<FONT face=arial 



else 

StrHTML += '   ' ; 

StrHTML += •) </FONT>' 4- 

this.„options[i] .text -f '  \n' ; 

else 

StrHTML -f= + 'INPUT name=' + this, id + ' 
value="' + server. HTMLEncode(this._options[i] .value) + type='Vadio" 

if (this.„selectedlndex == i) 
StrHTML += 'checked ' ; 
if (! thi s..options[i] .disabled) 
{ // output client events to callback 

to server 

var strHandler = 
thi sV_66lEventManager . generated i entHandl ers (thi s . name) ; 

StrHTML += StrHandler; 

} 

else 

StrHTML += ' disabled'; 
StrHTML += 'x' + 'LABEL for=" ' + this. id + 



htmlfor="' + this.id; 
'</LABEL>\n' ; 



StrHTML += '">' + thi s._options[i] .text + 

} 

StrHTML += '</TD>'; 
if (this._nAlignment == '0') 
StrHTML += '</TR>\n'; 



if Cthis._nAlignment != '0') 
StrHTML += '</TR>\n"; 
StrHTML += '</TABLE></TD></TR></TABLE>\n' ; 
Response. write(5trHTML) ; 

return this._preserveState() ; 



function _opt preservestateC) 

if (this.maintainState) 
{ // preserve state in hidden field 

var state = new Object; 
if (this.„nBorder != 0) 

state. _nBorder = this._nBorder ; 
if C!this._bvisible) 
Page 6 



OPTIONGRP.ASP 

State. „bvi si ble = false; 
if Cthis,_nAlignment I- 0) 

state._nAlignment = this.__nAlignment; 
state. _selectedlndex = this._selectedlnclex; 
state. _nCount = this._options. length; 
for (van i=0; i < this._options. length; i++) 

^ state['t' + i] = this._options[i] .text; 

if (t hi s._options[i] .value != this._options[i] .text) 

state['v' + i] = this. _options[i] .value; 
if (this._options[i] .disabled) 

stateC'd' + i] = true; 

} 

return thi sPage . persi ststate(thi s . name , state) ; 
return false; 

} 

function „OPT restoreStateQ 

var r = false; 

thi s ._f i reEvent (thi s . _f uncini t) ; 
if (this.maintainState) 

{ // attempt to restore previous state 

var state = thi sPage.unpersistState(this. name) ; 
if (state != null) 

this.clearO ; 

for (var i=0; i < state. _nCount; i++) 

^ ^ this.addltem(state['t' + i],state['v' + i]); 

if (stateC'd' + i] !- null) 

t hi 5 . _opti ons [i ] . di sabl ed = 
(stateC'd' + i] != '0' && state['d' + i] != 'false'); 

this.^selectedlndex = Number(state._selectedindex) ; 
if (state. _nBorder != null) 

this._nBorder = state. _nBorder; 

else 

this._nBorder = 0; 

if (state._bvisible != null) 

this._bvisible = (state._bvisible !:= '0' && 

else 

this._bvisible = true; 



state. _bvi si ble != 'false'); 



Numbe r (state . _nAl i gnment) 



if (state._nAli gnment != null) 
thi s._nAli gnment = 

else 

thi s.„nAli gnment = 0; 



r = true; 

} 

var newvalue = Request. Form(this. name) + "; 
if (newvalue != 'undefined') 

thi s . sel ectByval ue(newval ue) ; 
return r; 
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function _OPT_hasStateO 

if (this.maintainstate) 

return thi sPage . i sStatePersi sted (thi s . name) ; 
return false; 

} 

// eventhandler for databinding . 

f uncti on „OPT on rowenter(obj Recordset , st rDataFi el d) 

^ this. selectByvalueCobjRecordset. fields. getvalue(strDataField) + 

} 

// eventhandler for databinding 

f uncti on _OPT onbef oreupdate (ob j Recordset , st rDataFi el d) 

^ var value = this.getValueC) ; 

if (typeof (value) != 'undefined' && value != null) 

ob j Recordset . f i el ds . setval ue(st rDataPi el d , val ue) ; - 

} 

} // end of „OPT Prototype function 

</SCRIPT> 
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// Microsoft script Library<BR> 

// visual interDev 6.0 OptionGroup object for DHTML<BR> 

// copyright 1998 Microsoft Corporation. All Rights Reserved. <BR> 

// <B>Do not modify in design view. Switch to source view.</B><BR> 

1 1 V?**^r**yf***Vf* ****** ******* 

// <SCRIPT> 

f uncti on createopti onGroupCst rName , f uncini t , obj Parent) 

^ if (typeof(st rName) != 'string' M strName == ") 

return nul 1 ; 

var strTag = + 'TABLE border=0 cenpadding=0 censpacing=0 id=:"' + 
StrName + '„B0RDER"><tr><td><TABLE border=0 name="' + strName + id="' + strName + 

' "></TABLE></TD></TR></TABLE>' ; 

if ((typeof (obj Parent) === 'object') && (objParent != null)) 
obj Parent . i nsertAd j acentHTML ( ' Bef oreEnd ' , strTag) ; 

else 

document -write(strTag) ; 

var objOptionGroup = eval (strName) ; 
if (typeof (objOptionGroup) != 'object') 
return null ; 

ObjOptionGroup. _objBorder = eval (strName + '_border'); 
//events 

0PT_0NCHANGE = 'onchange'; 

^// instrinsic members 
* ' ' ^'y^ id & name : RO 

//private members 
objOptionGroup._nAlignment = 0; 
objOptionGroup. _nMaxlD = 0; 
objOptionGroup._objRowSource = null; 
objOptionGroup. _objDataSource = null; 
objOptionGroup. _strDataField = 

// public methods 

ObjOptionGroup. isvi si ble = _0PT„is visible; 
objOptionGroup. hide = _OPT_hide; 
objOptionGroup. show = „OPT_show; 
objOptionGroup. setBorder = _OPT__setBorder ; 
objOptionGroup. getBorder = _0PT_get Border; 
objOptionGroup. setAlignment = „OPT_setAlignment ; 
objOptionGroup. getAlignment = _OPT_getAlignment ; 
objOptionGroup.getButton = _0PT_getButton; 
objOptionGroup.addltem = „OPT_addltem; 
objOptionGroup. removeltem = _OPT„removeItem; 
objOptionGroup. clear = „OPT_clear; 
objOptionGroup.getCount = „OPT_getCount ; 
objOptionGroup.getvalue = „OPT_getvalue; 
objOptionGroup. setvalue = _OPT_setValue; 
objOptionGroup. getcapti on = _OPT_getcaption; 
objOptionGroup, setcapti on = _OPT_setCaption; 
objOptionGroup. selectByValue = „OPT_selectByValue; 
objOptionGroup. selectByCapti on ^ „OPT_selectByCaption; 
objOptionGroup. selectByindex = _OPT_selectBylndex; 
objOptionGroup. getselectedindex = „OPT_getselectedindex; 
objOptionGroup. getRowSource = _OPT_getRowSource; 
objOptionGroup. setRowSource = _OPT_setRowSource; 
objOptionGroup.getDataSource = „OPT_getDataSource; 
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objOptionGroup.setDataSource = _OPT_setDataSource; 
objOptionGroup.getDataField = _OPT_getDataField; 
obqOptionGroup.setDataField = _.0PT_setDataFie1d; 
objOptionGroup. advise = „OPT_advise; 

ob j Opti onGroup . advi seDef aul tHandl er = _OPT„advi seDef aul tHand I er ; 
objOptionGroup. unadvise = „OPT_unadvise; 
obj Opti onGroup. display = _OPT_di splay; 

// private methods 

objOptionGroup. _getTags = 0PT_getTags; 

objOptionGroup. _setBindings = OPT„setBindinqs; 

objOptionGroup.^setsingleBind = 0PT_setSing leBind ; 

objopti onGroup. _fireEvent = _OPT fireEvent; 

// advise for default eventhandlers 

objOptionGroup. _objEventManager = CreateEventManagerO ; 

objopti onGroup. _fireEventC'_OPT onbeforefuncini tC + objopti onGroup. id + 

objopti onGroup ._fi reEvent (f uncini t) ; 
return objOptionGroup; 



function „0PT_i5Vi si bleO _ ,s 

{ return (this.^objBorder .style. vi si bill ty != 'hidden ); } 

function _0PT_hideO , 

{ thi s._obj Border. style.vi si bi 1 i ty = 'hidden'; } 

function „OPT_showC) . n , 

.^this._objBorder. style. visibility = 'visible ; } 

functionr-OPT_getBorder() 

{ return this._objBorder. border; } 

function „OPT_setBorder(nBorder) 

{ this._objBorder. border = nBorder; } 

function „OPT_getAlignmentO 

{ return this._nAlignment; } 

f uncti on _OPT„setAl i gnment (nAl i gnment) 

^ if Ctypeof(nAli gnment) != 'undefined' && (nAlignment == '0' II nAlignment 

'1')) ^ 

if (nAlignment != this._nAli gnment) 

this.^nAli gnment = Number(nAl i gnment) ; 
if (nAlignment == 1) 

var men = this, rows. length 
var obj ROW = this.insertRowQ ; 
for (var i = 0; i < nLen; i++) 

objRow.insertCell 0 -innerHTML = 

this. rows (0) . eel ls(0) .innerHTML; 

this. del eteRow(O) ; 

} 

} 

else 

var nLen = this.rows(O) .cells. length; 
for (var i = 1; i < nLen; i++) 
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this.insertRowC) .insertcell C) -innerHTML = 

this, rows (0). cell s(l).innerHTML; _ 

thi s . rows (0) , del eteCel 1 (1) ; 

} 

} 

} 

return true; 

} 

return false; 

} 

function __OPT_get Button (nlndex) 

^ var objcell = this._getTags(nlndex) ; 

if (objcell != null) 

return objcell .children(O) ; 
return null ; 

} 

f uncti on „OPT„addltem(st rText , val ue , nlndex) 
var objcell ; 

if (typeof (value) == 'undefined') 
value = st rText; 

if (this._nAlignment '0') 

^ if ((typeof (nindex) 'number') && (nlndex >= 0) && (nlndex < 

thi S--.row3- length)) ^ ... -n 

" ' ^ objcell = this. insertRow(nlndex) .insertcell () ; 

"'else 

objcell = thi s.insertRowO -insertcell 0 ; 

} 

else 

^ if ((typeof(nindex) == 'number') && (nlndex >= 0) && (nlndex < 

this. rows (0) .eel Is. length)) , ^ 

objcell = this. rows (0). insertcell (nlndex); 

else ^^^^ 
objcell = this. rows (0) .insertcell 0 ; 

} 

if (typeof (value) == 'string') 

value = encodeHTMLQuotes(value) ; 

var strTag = + 'INPUT type="radio" id="' + this. id + this._nMaxID + ' 
name="' + this. id + '_value" value='" + value + 

onchange="JavaScript:_OPT_fireEvent()">' ; . ,n -.x 

StrTag + 'LABEL for='" + this. id + this._nMaxlD + htmlfor= + 

this. id + this.„nMaxlD + '" id="' + this. id + this._nMaxlD + '_LBL">'; 
StrTag += st rText + '</LABEL>'; 

objcell -innerHTML = strTag; . 
if (this.„objDataSource != null && this._objDataSource.isDHTMLAware() && 
this._,strDataField != ") 

thi s . „setsi ngl eBi nd (ob jcel 1 , t rue) ; 

} 

this._nMaxID++; 

} 

function _OPT_removeltem (nlndex) 
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if (typeof(nlndex) == 'undefined') 

nindex = this.getSelectedindexO ; 

if C!isNaN(parseint (nindex)) && nindex 0 && nindex < this.getCountQ) 

if Cthis._nAlignment == 0) 

this. del eteRow(Number (nindex)) ; 
else . 

thi s - rows(O) . del etecel 1 (Nufnber(nlndex)) 
return true; 

return false; 



function _OPT_clear() 

if (this.^nAlignment == 0) 

var nLen = this. rows. length; 
for (var i = 0; i < nLen; i+4-) 
this. del eteRow(O) ; 



} 

else 
{ 



} 



var nLen = this. rows (0) .eel Is. length; 
for (var i = 0; i < nLen; i++) 

this. rows (0) . del eteCel 1 (0) ; 



' ' i:hTs._nMaxlD = 0; 

Teturn true; 

} 

function „OPT_getCount() 

if (this._nAlignment == 0) 

return this. rows. length; 

else 

retu rn thi s . rows (0) . eel 1 s . 1 engt h ; 

} 

function „OPT_getValue (nindex) 

var objcell = thi s._getTags (nindex) ; 
if (objcell != null) 

return objcell .children(O) .value; 

return ' ' ; 

} 

f uncti on „OPT_.setVal ue (val ue , nindex) 

var objcell = thi s.„getTags (nindex) ; 
if (objcell != null) 

^ objcell .children (0). value = value; 

return true; 

} 

return false; 

} 

function _OPT_getCapti on (nindex) 
{ 
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var objcell = this._getTags(nindex) ; 
if (objcell != null) 

return objcell .children(l) .innerHTML; 
return ' ' ; 

} 

f uncti on „OPT_setCapti on (st rcapti on , nindex) 

var objcell = this.^getTagsCnindex) ; 
if (objcell != null) 

^ objcell .children(l).innerHTML = string(strcaption) ; 

return true; 

} 

return false; 

} 

function _OPT„selectByValue (value) 
{ // check for match in table 

var objcell = null ; 

var nLen = this.getCountO ; 

for (var i==0; i < men; i++) 

if (this.^nAliqnment = 0) 

objcell = this. rows (i) .eel Is (0) ; 

else 

objcell = this,rows(0).cells(i); 

. . - ^ if (value objcell .children(O) .value) 

^ objcell .children(O) .checked = true; 

return i ; 

} 

} 

return -1; 

} 

f uncti on „OPT_sel ectByCapti on (st rcapti on) 
{ // check for match in table 

var objcell = null ; 

var nLen = this.getCountO; 

for (var i=0; i < nLen; i++) 

if (this._nAlignment == 0) 

objcell = thi s. rows (i). cell s(0); 

else 

objcell = this.rows(0).cells(i); 

if (String(strcaption) == objcell . children(l) .innerHTML) 

^ objcell -children (0) .checked = true; 

return i ; 

} 

} 

return -1; 

} 

function _OPT_selectBylndex(nlndex) 

if (!isNaN(parseint(nlndex))) 
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if (nlndex >= 0 && nindex < this.getcountO) 

var objCell = null ; 

if (this._nAliqnment == 0) 

objcell = this. rows (nindex), eel Is CO); 

else 

objcell = this. rows (0) .cells (nindex) ; 
objCell .children (0) .checked = true; 
return nindex; 

} 

} 

return -1; 

} 

function _OPT_getSelectedlndex() 

{ // find index of checked item 

var objcell = null ; 

var nLen = this.getcountO; 

for (var i=0; i < men; i++) 

if (this.^nAlignment == 0) 

objcell = this. rows(i) .cell s(0) ; 

else 

objcell = this.rows(O) .cells(i) ; 

if (objcell .children(O) .checked == true) 
return i ; 

} 

return -1; 

function"r_OPT_getRowSource() 

{ return this-_objRowSource; } 

f uncti on _OPT_setRowSou rce (ob j Recordset , 1 i st Fi el d , bound Fi el d) 

^ if (typeof (obi Recordset) == 'object' && this.getcountO == 0) 

{ // only allow setting one lookup source to be consistent with 

var nPos = objRecordset.absolutePosition; 
this._objRowSource = obj Recordset ; 
ob j Recordset, moveFir St () ; 
while (! obj Recordset. EOF) 

var obj Fields = obj Recordset, fields; 

thi s . addltem (obj Fi el ds . getval ue (1 i stFi el d) , obj Fi el ds . getval ue (boundFi eld)); 

obj Recordset. moveNextO ; 

objRecordset .moveAbsolute(nPos) ; 
return true; 

} 

return false; 

} 

function _OPT_getDataSource() 

{ return this.„objDatasource; } 

f uncti on _OPT_setDataSou rce(ob j DataSou rce) 

if (typeof (objDataSource) != 'object') 
return false; 

if ((this. ..ObjDataSource != null) && (this._strDataField != ")) 
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i f (thi s . _ob j Datasou rce . i sDHTMLAware () ) 
thi s ._setBi ndi ngs(f al se) ; 

} 

else 
{ 



} 



} 



thi s ._objDataSource . unadvi se(thi s ._rowEnterlD) ; 
thi s ..objDataSource . unadvi se(thi s .„rowExi tiD) ; 



if C(this._objDataSource null) || (objDataSource != null && 
this._objDataSource.id != objDataSource. id)) 

if (this. .ObjDataSource != null) 

thi s ..ObjDataSource . unadvi se(thi s ._afterOpenlD) ; 

this.^afterOpenlD = objDataSource.advise(RS„ONAFTEROPEN, this. id + 
' .setDataSourceC + objDataSource. id + ');'); 
} 

t hi s._obj Datasou rce = objDataSource; 

if ((objDataSource != null) && (this.„strDataField != ")) 
if (objDataSou rce. 1 SDHTMLAware 0) 
thi s . _setBi ndi ngs (true) ; 

} 

- ; ^ _ else 

this._rowEnterlD = objDataSource. advise (RS_ONROWENTER, 

•„OPT onrowenterC + objDataSource. getiD() + ' + this. name + + 

this._strDataField + '");'); ... 

this._rowExitiD = objDataSource. advise (rs_onrowexit, 
'_.OPT_onrowexit(' + objDataSource.getlDO + , ' + this. name +',"' + 
this._strDataField + ');'); 
} 

} 

return true; 

} 

function _OPT_getDataField() 

{ return this.^strDataField; } 

function _OPT„setDataField(strDataField) 

^ if ((this. .ObjDataSource != null) && (this._strDataField != ")) 

i f (thi s . _ob j Datasou rce . i sDHTMLAware () ) 
thi s ._setBi ndi ngs (f al se) ; 



} 

else 
{ 



thi s ._obj Datasou rce . unadvi se(thi s ._rowEnteriD) ; 
thi s ..ObjDataSource. unadvi se(thi s ._rowExi tID) ; 



} 



this._strDataField = strDataField; 

if ((this._objDataSource != null) && (this,_strDataField != ")) 
{ 
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i f (thi s ._objDataSource . i sDHTMLAwareO) 
this._setBindingsCtrue) ; 

} 

else 

this._rowEnterID = this.„objDataSource.adviseCRS_ONROWENTER, 

•_OPT onrowenterC + this._objDataSource.getlD() + ' + this. ID + + 

strDataField +'");'); ... 

this.„rowExitiD = this.„objDataSource.advise(RS_ONROWEXiT, 

'„OPT onrowexitC + this,„objDataSource.getlDC) + ' + this. ID + + 

StrDataField + '");'); 

} 

} 

return true; 

} 

function _OPT_displayC) 
{ } 

function _OPT_advise(strEvent,funcToCall) 

^ var nAdviselD = this.„objEventManager .advise(strEvent ,funcToCall) ; 

if CnAdviselD 1= -1) 

evalC'this.' + strEvent + ' = _OPT fi reEvent; ') ; 

return nAdviselD; 

} 

fi^nction. _OPT„advi seDefault Handle r(strName, strEvent) 

"var nAdviselD = 
thi s .„obj EventManager . advi seDef aul tHandl er (strName , strEvent) ; 
if (nAdviselD != -1) 

evalC'this." + strEvent + " = „OPT fireEvent; ); 

} 

f uncti on _OPT„unadvi se(st rEvent , nAdvi selD) 

^ return thi s ._obj EventManager . unadvi se(st rEvent , nAdvi selD) ; 

} 

function OPT_getTagsCnlndex) 

if (typeof (nlndex) == "undefined') 

nindex = this.getSelectedlndexC) ; 

var objcell = null; , . 

if (lisNaNCparselntCnlndex)) && nlndex >= 0 && nindex < this.getCountQ) 

if (this._nAlignment ==0) ... 

objcell = thi5.rows(Number(nlndex)).cellsC0); 

else 

objcell = this. rowsCO) .cells(Number(nlndex)) ; 

return objcell ; 

} 

function OPT_setBindings(bBind) 

var men = this.getCountO ; 
if (this._nAlignment == 0) 
{ 
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for (var i=0; i < men; i++) 

^ var objcell = this, rows (i) .cells (0) ; 

this.^setSingleBindCobjcell ,bBind) ; 

} 

for (var i=0; i < men; 

^ var objcell = this. rows (0) .cells (i) ; 

this.„setSingleBind(objCell , bBind) ; 

} 

} 

} 

function OPT_setSingleBind(objCell , bBind) 

^ if (objcell != null) 

^ if (bBind) 

^ objcell ■children(0).datasrc = + 

this. obiDataSource.getDHTMLDataSourceiDQ ; ^. 
^ - y objcell. children(0).dataFld = this.^strDataField; 

} 

else 

- ..-..^ ^ objcell. children(O). datasrc = "; 

objcell. children(O). dataFld - 

} 

} 

} 

function „OPT fi reEvent(funcToFi re) 

^ if (typeof (f uncToFi re) == 'undefined') 

{ 

var strOptionGroup = wi ndow. event. srcElement .name; 
strOptionGroup = 
stropti onGroup . subst ri ng (0 , st rOpti onGroup .1 ength;6) ; 

var objopti onGroup = eval (strOptionGroup) ; 
if (typeof (objopti onGroup) ~ "object' && 

objoptionGroup._objEventManager != null) ^ 
^ K J objOptionGroup.„ob]EventManager.fireEvent( on + 

wi ndow , event . type) ; 
} 

else . ^ 

_EM fi reEvent(funcToFi re) ; 

} 

function oPT_onrowenter(objRecordset,objOptionGroup,strDataField) ^. 

{ Ob j optTonGroup . sel ect ByVal ue (ob j Recordset . f i el ds , getval ue (st roataFi el d) 

''); } 

f uncti on _OPT_on rowexi t (ob j Recordset , ob j Opt i onGroup , st roataFi el d) 

^ var value = objOptionGroup. getval ue() ; 

if (typeof (value) != 'undefined' && value != null) 

ob j Recordset . f i el ds . setval ue (st rDataFi el d , val ue) ; 
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function _opt onbeforefuncinit(obiOptionGroup) 

{ objOptionGroup.adviseDefau1tHandler(objOptionGroup.id,OPT_ONCHANGE) ; } 



o 

m 
a 

01 
;n 
o 
m 

o 

0 
w 



Page 10 



PM.ASP 

<SCRIPT RUNAT=SERVER Language^" JavaScri pt"> 

I y jj- ^ J- J-. J. J. y- ^- j;- J. ju J. A ju ^ ^ J- j;- if J-- ,v itit-ifitifkiiiiicit it it it -it it it * * * » * i: it it it it it it it it it it it it it it 

// Microsoft script Library ^ , ^ 

// visual interDev 6.0 Scripting Object Model framework for server. 

// Copyright 1998 Microsoft Corporation. All Rights Reserved. 

Y^^^jfUf^.jf^^.%ifif^ifi.ifi(itieicititi(^ici(iiici:ititi^ 

I ^^^^ififiti-isifititicitititititititicieititicititititititititi^ititititititititititi^ 

II function startPageProcessingO 

// This is the method which starts page processing. 

// The following sequence of events will occur : 

// 1, create thisPage object ( programming model object ) 

// 2. invoke all constructors on the page ( xxx_ctor functions ) 

// 3. fire 'oninit* events 

// 4. fire 'onenter' events 

// 5. dispatch to appropriate server method 

// 6. return TRUE if processing is complete 

// return FALSE to continue processing of page 

y^-kititititititititititititieitititititititititititit'kititititititititititititititititititititit^^ 

function StartPageProcessingO 

^ if (typeof(thisPage) != 'object') 

this Page = new _SOMObject; 

if (typeof (RuntimeObject) != 'undefined') 

^ var ctors = RuntimeObject('*_ctor') ; 

for (var name in ctors) , ^ rr - n 

- { // invoke all constructor functions ( xxx^ctor functions ) 

_ if (typeof (ctors [name]) == 'function') 

ctors [name] () ; 

} 

} 

else 

{ // display warning 

var strwarning = ^<br><hr><b>WARNlNG: Web server + 
Request.Servervariables('SERVER_NAME') + '" requires an updated DSCRIPT.DLL. ; 

strwarning += '<br>The Visual InterDev 6.0 Scripting Object Model 
requires JSCRIPT.DLL Version 4.0.0.2405 or greater.'; 

Response. write(strwarning) ; 

} 

thi sPage._objEventManager.fi reEvent(PAGE_ONINlT) ; 
thi sPage._objEventManager.fi reEvent(PAGE_ONENTER) ; 

thisPage.dispatchO ; 

if (!thisPage._bEndPageProcessing) 

thisPage._objEventManager.fi reEvent(PAGE_ONSHOW) ; 

i f (thi sPage ._bEndPageProc€Ssi ng) 
EndPageProcessingO ; 

return thi sPage ._bEndPageProcessi ng ; 

} 

^ ^^ifitififii^ititicitititititititititicitititititititititititititititititititititi^^ 

II function EndPageProcessingO 

// This is the method which ends page processing. 
// The following sequence of events will occur : 
// 1. if execute method was invoked, do nothing 

// 2. fire 'onexit' events 
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// 3. invoke all destructors on the page ( xxx_dtor methods ) 

// 4. if redirect defined, invoke redirect, otherwise 

// 1. persist state in hidden field 

***************************** 
function EndPageProcessingO 

^ if (typeof(thisPage) == 'object' && ! thisPage._bExecuteMethodlnvoked) 

^ if CthisPaqe._objEventManager != null) 

thi sPage . „ob j EventManage r . f i reEvent (PAGE_0NEXIT) ; 

var dtors = RuntimeObjectC "*„dtor ') ; 

for (var name in dtors) . 
{ // invoke all destructor functions ( xxx_dtor functions ) 

if (typeof (dtors [name]) == 'function') 
dtors [name] () ; 

} 

if (thisPage._redi rect != '') 

Response. redi rect(thisPage._redi rect) ; 



thi SPage . „generateHi ddenFi el ds () ; 

} 

} 

^ yvt*************************^- 

// function _SOMObject() , , 

// constructor function for the 'thisPage' object. 

/'/ - -'-This object provides the programming model services for the 

// 4iage and is instantiated as the 'thisPage' object. 

^y^-^^ A v-^^A- ********************************* *****************" 

function „SOMObject() 
//events 

PAGE^ONINIT = 'oninit'; 
PAGE„ONENTER = 'onenter'; 
PAGE_ONSHOW = 'onshow'; 
PAG E„ON EXIT = 'onexit'; 

//constants 

PAGE^NAVIGATE = 'navigate'; 
PAGE_EXECUTE = 'execute'; 

//public members 

this-createDE = „SOM_createDE; 

this. dispatch = _SOM_dispatch; 

this.invokewethod = _S0M_i nvokeMethod ; 

this.navigateURL = _SOM_navi gateURL ; 

this. registerMethod = _SOM_registerMethod; 

this.registerVTable = _S0M_registerVTable; 

this.setstate = „SOM_setState; 

this.getstate = _S0M_getstate; 

this.persiststate = _SOM„persistState; 

this.unpersiststate = _SOM_unpersistState; 

this.isStatePersisted = _S0M_isStatePersisted; 

this. advise = _SOM_advise; 

this.unadvise = _SOM_unadvise; 

this.startPageContent = „sOM_startPageContent; 

this.endPageContent = _sOM_endPageContent ; 

this.isDHTMLBrowser = „SOM„isDHTMLBrowser ; 

this.fi rstEntered = (Request. Form('_method') .item == null); 
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//private members 

this._dispatchGET = _SOM dispatchGET; 

this._dispatchP05T = „SOM dispatchPOST; 

this.„buildURL = _SOM buildURL; 

this._extractvalue = _SOM extractvalue; 

this._qenerateHiddenFields = _SOM generateHiddenFields; 

this.„bDECreated = false; 
this,_bPageContentStarted = false; 
this._bEndPageProcessing = false; 
this._bExecuteMethodlnvoked = false; 
this.„vtableNavigate = null; 
this._vtableExecute = null; 

this.__objState = this.unpersistState('thisPage') ; 
if Cthis._obj State == null) 

this._.obj state = new object; 
this._objStateObjects = null; 

this. .location = escape(Request.Servervariables ('SCRIPT .NAME')) ; 
this.„redi rect = ' ' ; 

this.„objEventManager = CreateEventManagerC) ; 

thi s . _obj EventManager . advi seDef aul tHandl er ( ' thi sPage ' , page^ONENTER) ; 
thi s . __ob j EventManage r . advi seDef aul tHandl er ( ' thi sPage ' , page_onshow) ; 
thi s ._obi EventManager . advi seDef aul tHandl er ( ' thi sPage ' , PAGE_0NEXIT) ; 
thi s . regi sterMethodC '_EM oncl i entevent ' ,_EM oncl i entevent) ; 

//scope implementation to _SOMObject constructor function 

// function _SOM„createDE() 

Create the data environment object as DE 

function _SOM_createDE() 

if (!this._bDECreated) 

DE = Server. CreateObiectC'DERuntime. DERuntime') ; 
DE . ini t (Appl i cati on C DE ' ) ) ; 
this._bDECreated = true; 

} 

} 

/ y^*Ve***^*****y^** ****************** 

// function _SOM„dispatch() 

// This function dispatches to the method indicated by the URL. 

^ y************************************************** 

function „SOM_dispatch() 

var bDispatched = false; 

var requestMethod = Request. ServerVariables('REQUEST_METHOD'). Item; 
if (requestMethod == 'GET') 

bDispatched = this._dispatchGET() ; 
else if (requestMethod == 'POST') 

bDispatched = this._dispatchPOST() ; 

// output client-side thisPage when navigating within this ASP 
if (!this._bExecuteMethodlnvoked && thi s._redi rect == '') 

this. start PageContent(O) ; 
return bDispatched; 

} 

^ ^**********************************************************"* 

// function _SOM_invokeMethod(url , method, args) 

// This function navigates to the method indicated. 

Page 3 



PM.ASP 

1 1^^^ ititit-k itit-ii it ic it it ici( -k ic-k it -k i( it * it it i< it it if itititititk ititititk it it kit k kit kit k it it it kkkit kitk k it kick 

function _sOM„invokGMethod(url , method, args) 

^ thi s . navi gateURLCthi s ._bui IdURLCurl , method , args)) ; 

} 

^ ^ i-.}. it kkititit it itititkit it itit it kit ititkkiticitkii it ick ititititk kit ititkkkiti: kitk kit kit i^ 

// function _SOM_navigateURLCurl) 

// This function navigates to the URL indicated. 

Y^^i.^i.i.ififitiiifititiii;ickititititkitkititititititkitititkititkitickkitititititkititkitit^ 

function „SOM„navigateURL(url) 

{ // optimize to dispatch when URL is this file 

this._redirect = url ; 
EndPageProcessi ngO ; 

} 



y ^^^ifif^iti-itit^ititititkitititititkitkitititititkitititk^itititititkititititititkitit^^ 

// function _SOM_registerMethodCstrName,fPtr,mType) 

// Register the given name/function as an exported server method. 

// The mType should indicate either PAGE_NAVIGATE or PAGE_EXECUTE 

y^^^^^-^.^i.i,^^^.ici^icicititk*itkkitickkititickitkititickititicitititititkitititkititit^^^ 

function _sOM_registerMethod(strName,fPtr, mType) 

{ // default mType = page_navigate if not provided _ 

if (typeof(strName) == "string' && typeof(fPtr) 'function ) 

^ if (mType == PAGE„EXECUTE) 

if (this._vtableExecute null) 

this.„vtableExecute = new object; 
^- : - ^ this._vtableExecute[strName] = fPtr; 

return true; 

If (mType == PAGE_NAVIGATE ll mType == null) 

^ if (thi s.^vtableNavi gate == null) 

thi s.„vtableNavi gate = new Object; 
this._vtableNavigate[strName] = fPtr; 
return true; 

^ } 
return false; 

} 

y ^it^ititicititicitititkititititkititititkitititititickititkkitititkitititkitkkitickititicit^ 

// function „sOM„registerVTable(objVTable, mType) 

// Register the given object of function ptrs as exported methods. 
// The mType should indicate either page_navigate or page^execute 

y^^^i.i,i,-kiticititkitkkititki(ickititkki<ititkiti:ititkititititkkititititititititititi^ 

function _sOM_reqisterVTable(objVTable, mType) 
{ // default mType = page_navigate if not provided 

if (typeof(objVTable) == 'object') 

^ if (mType == PAGE_EXECUTE) 

if (this.„vtableExecute == null) 

this._vtableExecute = new Object; 
for (var name in objVTable) 

^ if (typeof(objVTable[name]) == 'function') 

thi s._vtableExecute [name] = 

objVTable [name] ; ^ 

return true; 
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if CmType == PAGE_NAVIGATE || mType == null) 

if (this.„vtableNavigate == null) 

this.„vtableNaviqate = new object; 
for (var name in objVTable) 

if (typeofCobjVTableCname]) == 'function') 
this-_vtableNavi gate [name] = 



} 



} 

return true; 



} 

return false; 

} 

// function „SOM_setStateCstrName, value) 

// Stores the given value as state using the given name as a key. 

f unct i on _SOM„setState (st rName , val ue) 

if Cthis._obj State == null) 

this._obj State = new object; 
this._objState[strName] = value; 

} 

function _S0M__get State (st rName) 
JJ Retrieves the given value for the state of given name. 

function _SOM_getStateCst rName) 

if (this.„obj State == null) 
return null ; 

if (this._obj State [st rName] == null) 
return null ; 



} 



return this._objState[strName] ; 



y y^5t^^^^-^^^Vf ********************************************** 

// function _SOM_persistStateCstrName,obj5tate) 

// Persists the given object as state using the given name as key. 

// Current implementation will persist state in a hidden field at 
// the end of the file via the _generateHiddenFields method. 

y y^*^^^-*^*^^-*Vt* ****************************************** ********** 

f uncti on _SOM„persi ststate (st rName , ob j State) 

^ if (typeof(strName) == 'string' && typeof (objstate) == 'object' 

strName != " && objstate != null) 

if (this._objStateObjects == null) 

this..objstateObjects = new object; 

this._objStateObjects [strName] = objstate; 
return true; 

return false; 

} 
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^ y J- ^ y ^. ^ ^. ^. iiicicitic-ififlc-it* it if it is ii it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it 

// function __SOM_„unpersistState(strName) 

// Retrieves a state object using the given name as a key. 

// current implementation retrieves state from a hidden field. 

^ ^ if if it it ^. ^( ^ic it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it 

function „S0M_unpersistState(strName) 

^ if (typeof (strName) == 'string' && strName != ") 

^ var strstate = Request .Form('_.' + strName + '_state') .Item; 

if (strstate strstate != null) 

var state = new Object; 
var nEq, nAmp, name, value; 
while est rstate. length > 0) 

nEq = strstate. i ndexofC = ' ) ; 
nAmp = strstate. indexof ('&'); 
if (nAmp == -1) 

nAmp = strstate. length + 1; 
name = strstate. substring(0, nEq) ; 
value = strstate. substring(nEq+l, nAmp) ; 
state[name] = unescape(val ue) ; 
strstate = 

St rstate . subst ri ng (nAmp+1 , strstate . 1 ength) ; 

return state; 

} 

} 

^ return null ; 

X 

I ^i.i.i.ififi.i.ifiiitificicieititititiiicitititititititititititititititititi^ 

// function _.S0M„isStatePersisted(strName) 

// Returns TRUE if there exists a state for the given key name. 

y^ififififififififititititititititititititititititititititititititititititititititititi^ 

function _S0M_isStatePersisted(strName) 

^ if (typeof (strName) = 'string' && strName != ") 

^ var strstate = Request . Form('_.' + strName + '_state') .Item; 

if (strstate != " && strstate != null) 
return true; 

return false; 

} 

y ^ififi^ififififificififificitititicitititititititititititititititititititititititititititit^ 

// function _SOM_advise() 

// Allows others to advise for MSPM events. 

y^ififi.ififififi.ificificififi:i:ititititititititititititititititititititititititititit^ 

function _S0M_advise(strEvent ,funcToCall ,nPriority) 

^ retu rn thi s ._obj EventManager . advi se(st rEvent , f uncToCal 1 , nPri ori ty) ; 

} 

y ^ it if if if ii if it it if it ic it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it 

// function _SOM_unadvise() 

// Allows others to unadvise for MSPM events. , ^ 

y^ififitififififififificititititititititititititititititifi:ic*ii^-lcii*ii*itititiiit^ 

function _SOM„unadvi se(st rEvent , nAdvi selD) 

^ return thi s ._obj EventManager . unadvi se(strEvent , nAdvi selD) ; 
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} 

// function „SOM_startPageContent(bFormType) 

// Output dient-side MSPM and thisForm if requested. 

// 0 : NO FORM 

// 'undefined' or 1 : FORM method=POST 

// 2 : FORM 

function _SOM_startPageContentCbFormType) 

if (!this.„bPageContentStarted) 

this._bPageContentStarted = true; 
var seconaSlash; 

var webRoot = StringCthis. ..location) ; 
if ((secondslash = webRoot .indexOfCV' ,1)) != -1) 
webRoot = webRoot.substringCO, secondslash) ; 

else 

webRoot = ' ' ; 

var strHTML = + 'SCRIPT LANGUAGE=JavaScript SRC="' + 
webRoot + V_ScriptLibrary/pm. js"><' + '/SCRlPT>\n' ; 

StrHTML += + 'SCRIPT 

LANGUAGE=JavaScript>thisPage. .location - "' + this. .location + '";<' + VscRlPT>\n' 

if (typeof (bFormType) == 'undefined' || bForniType == 1) 
StrHTML += '<FORM name=thi sForm method=POST> ' + 

//strHTML += '<FORM name=thi sForm method=POST 
1 anguAge=DAVASCRiPT onsubmit="retu rn thisPage.formlsValid; ">' + '\n'; 
^ ^ else if (bFormType == 2) 

StrHTML += '<FORM name=thi sForm language=3AVASCRIPT 
onsubmit=" return false;">* + 'Xn'; 

Response. write(strHTML) ; 

} 

} 

// function .SOM_endPageContent() 

// Provided for user methods to end page processing and 

// cancel processing of the 'show' part of the page. 

/ yv?***^?*****^'*** ******************* 

function _SOM_endPageContentC) 

{ this.„bEndPageProcessing = true; } 

^ ^jf-v**** *********************************************** *********** 
// function _SOM_isDHTMLBrowser() 

// Return TRUE for those browsers which support DHTML. 

// currently this method looks for MSIE 4.x and 5.x, 

^y^******** ************************************************** ******* 

function _SOM_isDHTMLBrowser() 

if (typeof (this. .isDHTMLBrowser) == 'undefined') 

this._isDHTMLBrowser = false; 
var userAgent = 
St ri ng(Request . ServerVari abl es( ' HTTP„USER^GENT' )) ; 

if (userAgent. indexOfC MSIE 4.') != -1 M 

userAgent. indexOfC MSIE 5.') != -1) 

this._isDHTMLBrowser = true; 

} 

return this ._isDHTMLBrowser; 
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// function _SOM dispatchGEXQ 

// Dispatches methods invoked via an HTTP GET request, 
function „SOM di spatchGET() 

^ var methodname = Request .QueryStringC_method') .Item; 

var methodtype = Request .QueryStringC_mtype') -Item; 
if (methodtype == PAGE_EXECUTE) 

^ // return if methodname is not provided 

if (methodname == * ' II methodname null) 
return false; 

if (this.^vtableExecute U null && typeof (RSDi spatch) == 

'function') 

this._bExecuteMethodlnvoked = 

RSDi spatch (this. _vtabl eExecute , methodname) ; 

this.„bEndPageProcessing = 

this.^bExecuteMethodlnvoked; , , , . 

return thi s ._bExecuteMethodinvoked ; 

return false; 

// default to show if methodname is not provided 
if (methodname :== " II methodname == null) 
methodname = 'show'; 

. // default to navigate if methodtype is not provided 

'^'^ if (methodtype != && methodtype != null && methodtype ! = 
PAGE_NAVIGATE) 

return false; 
if (this._vtableNavigate != null && 
typeof (this._vtableNavi gate [methodname]) == 'function') , 

{ // validate that function is part of this._vtableNavigate 

description ^ ^ . ^ 

// extract parameters and dispatch to 

thi s .„vtabl eNavi gate . methodname 

var params = ' ' ; 

var pcount = Request . QuerySt ring ('pcount ).ltem; 
if (pcount == " II pcount null) pcount = 0; 
// extract parameter values 
for (var i=0; i < pcount; i++) 

^ var param = Request. QueryString('p'+i) .item; 

if (param null) 

params 'null ' ; 

params += 'Request. QuerySt ring( p + i + 



").item'; 



if (i < pcount-1) 
params += 



var dispatch = ' thi s._vtabl eNavi gat e. ' + methodname + '(' + 
params + ) , validated against thi s._vtabl eNavi gate, safe to eval on 



the server 



eval (dispatch); 
return true; 

if (methodname == 'show') 
return true; 
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return false; 

} 



U J< ^< J* J. 



I ^-k it if -k -it -icit -it it -ic it ic it -If -k idt it idcic it itititit itit ici: it it it itiritit ititititit icitit ic it it it it it it it it it it it iticit i 

// function _SOM dispatchPOST() 

// Dispatches methods invoked via an HTTP POST request. 

^ ^ititititititkititititititititititititititititititititititititititititititititititititititititititititit^^ 

function _SOM dispatchPOST() 

var querystring = Request. Form('_method') .Item; 
if (querystring == " I I querystring == null) 
return false; 

if (querystring.indexof (this. .location) != 0) 
{ // redirect to another page 

this._redirect = querystring; 

this.„bEndPageProcessing = true; 

return true; 

} 

querystring +='&'; , 

var methodname = this._extractvalue(querystring, '?_method ); 

if (methodname == null) 

methodname = 'show'; 
if (this._vtableNavigate != null && 
typeof (this,_vtableNavi gate [methodname] )== 'function') 

{ // validate that function is part of this._vtableNavTgate 

description 

// extract parameters and dispatch to 
thi sPage , Navi gate . methodname 
' ' " var params = ' ' ; , ,n 

var pcount = this._extractvalue(querystring, pcount ); 
if (pcount == null) pcount = 0; 
// extract parameter values 
for (var i=0; i < pcount; i++) 

^ var param = this._extractValue(queryString, 'p'+i) ; 

if (param null) 

params += 'null' ; 

else 

params += 

'unescape(this._extractvalue(querystring,"p' + i + '"))'; 

if (i < pcount-1) 

params += ' , ' ; 

} 

var dispatch = 'this,„vtableNavigate. ' + methodname + '(' + 

// validated against thi s.„vtableNavi gate, safe to eval on 

eval (dispatch) ; 
return true; 

if (methodname == 'show') 

return true; 
return false; 

} 

y ^if^i- if ififieisit it iti(i;iciticitit ititititit itit itit ititkitititit itit itit ititititit it i^ 

// function _SOM buildURL(url , method, args) 

// PRIVATE HELPER FUNCTION 

// Create URL which represents call to given method. 

^ ^ if if if if i( ic it if i; if if i( ici: if it iiicic it it it it it it it it it it it it it it it it it it it it -kit it it it it -ki^ 
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function _SOM_buildURL(url .method, args) 

if (typeof (method) === 'string') 

url += '?_method=' + method 
var params = '&pcount=:0' ; 

if (typeof (args) != 'undefined' && args. length) 

{ // add parameters 

params = '&pcount=' + args.length 
for (var i = 0; i < args. length; i++) 

var arg = args[i] ; 

params += '&p' + i + + escape(arg); 

} 

} 

url += params; 
return url ; 

} 

// function _SOM extractvalue(s,name) 

// PRIVATE HELPER FUNCTION 

// Extracts the value of a name/value pair from the given string, 

// if it conforms to the following format : 'name=value&' 

f uncti on _„SOM extractval ue(s , name) 

var chstart = s.indexof (name + '='); 
if (chstart != -1) 

chstart += name. length + 1; 

var chEnd = s.indexOf ('&', chstart) ; 

if (chEnd -1) 

chEnd = s. length + 1; 
return s.substring(chstart, chEnd) ; 

} 

return null ; 

} 

// function „SOM generateHiddenFieldsO 

// PRIVATE HELPER FUNCTION 

// Generates hidden fields for _method and all state that needs 

// to be round-tripped to/from the client. 

f uncti on „SOM generateHi ddenFi el ds () 

^ var strHTML = '\n<' + 'input type=hidden name="_method">\n' ; 

thi s , persi ststate( ' thi sPage ' , thi s .„obj state) ; 
if (thi s._obj Stat eObjects != null) 

{ // output a hidden field for each state object 

for (var hiddenName in this._objStateObjects) 

^ var objstate = thi s._objStateObjects [hiddenName] ; 

var strstate = " ; 
for (var name in objstate) 

^ if (objstate [name] != null) 

^ if (strstate != ") strstate += '&' ; 

strstate += name + '=' + 
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escape(obj State [name] ) ; ^ 



strHTML += + 'INPUT type=hidden name="_' + 
hiddenName + *„state" value="' + strstate + '">\n*; 

} 

Response. Write(strHTML) ; 

} 

} // end of _SOM_Object constructor function 

// shared functions for handling databinding 
function __S0M_getDataS0urceO 

{ return this.„objDataSource; } 

function _soM„setDataSourceCobjDataSource) 

^ if (typeof (objDataSource) != 'object') 

return false; 

if ((thi5._objDataSource != null) && (this._strDataField [= ")) 

^ thi s ..objDataSource . unadvi se(thi s ._rowEnterID) ; 

thi s ._objDataSource . unadvi se(thi s ._bef oreUpdatelD) ; 

this._objDataSource = objDataSource; - -.^ , 

if ((this._objDataSource != null) && (this.^strDataField != )) 

^ this._rowEnterlD = this.„objDataSource.advise(RS_ONROWENTER, this.id 

onrowenterC + this. objDataSource. id + ', + this-_strDataField + ); ); 
+ ._onr^wenter^^^+^xms^_^^^ ^ this._objDataSource.advi se(RS_ONBEFOREUPpATE, 

this. id + " ._onbeforeupdate(" + this._objDataSource.id this._strDataField 

+ '");•); 
} 

return true; 

} 

function „S0M_getDataFieldO 

{ return this._strDataField; } 

f uncti on „SOM_.setDataFi el d (st rDataFi el d) 

^ if ((this. .ObjDataSource 1- null) && (this._strDataField != ")) 

^ this. .ObjDataSource. unadvi se(this._rowEnteriD) ; 

thi s ..ObjDataSource . unadvi se(thi s ..beforeUpdatelD) ; 

thi s._st rDataFi eld = strDataField; - , 

if ((this. .ObjDataSource != null) && (this. .strDataField !- )) 

^ this..rowEnterlD = this. . objDataSource. advise(RS.ONROWENTER, this. id 

+ ' onrowenterC + this. objDataSource. id this. .strDataField + ); ); 

+ ..onrowenxeri^^^+^xnib^.^^j^^^^ ^ this..objDataSource.advise(RS.ONBEF0REUPpATE, 

this id + ' ._onbeforeupdate(' + this. .objDataSource. id thi s ..strDataField 

+ '");'); 

return true; 

} 

// Microsoft scripting Libary 

// visual interDev 6.0 EventManager Object for asp 
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// Copyright 1998 Microsoft Corporation. All Rights Reserved, 
function CreateEventManagerQ 

return new _EventManagerC) ; 

} 

function _EventManager() 

^ if CtypeofCbEMPrototypeCalled) == 'undefined') 

_EM_Prototype() ; 
this._events = new Array; 
this._nLastAdviseID = 0; 

} 

function „EM_Prototype() 

{ // public . . ^ - 

_EventManager. prototype. advise = _EM_advise; 

„EventManager . p rototype . advi seDef aul tHandl e r = _EM„advi seDef aul tHandl e r ; 
_EventManager. prototype. unadvise = _EM_unadvise; 
_EventManager . prototype . f i reEvent = _EM__f i reEvent ; 
_EventManager. prototype. getEventCount = _EM_getEventCount ; 
„EventManager. prototype. getEvent = _EM_getEvent; 

_EventManager . prototype . generated i entHandl er = _EM_generateCl i entHand I er ; 
_EventManager. prototype, generated ientHandlers = _EM_generatedi entHandl ers; 

_bEMPrototypeCalled = 1; 

. - : - -^//scope implementation to _EM_Prototype function 

function _EM_Advisor() 

this.funcToCall = 0; 
this.nAdviselD = 0; 
this.nPriority = 0; 

} 

function _EM_advise(strEvent,funcToCan ,nPriority) 

^ if ((typeof(strEvent) — 'string') && (strEvent !='')&& 

(typeofCfuncToCall) != ^undefined')) 

^ if Ctypeof(this.„events [strEvent]) == 'undefined') 

this.^events [strEvent] = new Array; 

var adviseList = thi s._events [strEvent] ; 
var obj Advisor = new ^EM^dvisor; 
var nLen = adviseList. length; 
objAdvisor.funcToCall = funcToCall; 
objAdvisor.nAdviselD = ++this._nLastAdviselD; 

// maintain list sorted in descending priority 
if (typeof (nPriority) == 'number') 

objAdvisor.nPriority = nPriority; 

if (nLen == 0 | I objAdvisor.nPriority <= 
advi seLi St [nLen-1] .nPriority) .... . 

{ // same or lower priority as last item, append to 

end ^ ^ , . , . 

adviseList [nLen] = objAdvisor; 

} 

else 
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// higher priority than last item, insert in 

for (var i=0; i < men; i++) 
{ 

if (obj Advisor. nPriority > 
break; 

// insert item at priority ordered index 
var axemp = adviseList .slice(i) ; 
adviseList .length = i; 
adviseList[i] = objAdvisor; 

this,_events[strEvent] ^ adviseList.concat(aTemp) ; 

} 

return this._nLastAdviselD; 

} 

return -1; 

} 

f uncti on _EM_advi seDef aul tHandl er(st rName , st rEvent) 

var strDef aul tHandl er = strName + + strEvent; 

if (evalC'typeofC + st rDef aul tHandl er + ')') == 'function' || 
evalC'typeofC + st rDef aul tHandl er + ')') == 'unknown') 
return this.adviseCstrEvent,strDefaultHandler + '()'); 

return -1; 

} 

. f uncti on _EM_unadvi se(st rEvent , nAdvi seiD) 

if ((typeof (strEvent) != 'undefined') && 
(nAdvi selD != 'undefined') && 

(typeof (this. _events [strEvent]) != 'undefined')) 



{ 



var adviseList = thi s._events [strEvent] ; 
var nLen = adviseList. length 
for (var i=0; i < nLen; i++) 

if (adviseList[i] .nAdvi selD = nAdvi selD) 

var axemp = adviseList.slice(i+l) ; 
adviseList .length = i; 
this.^events [strEvent] = 



return true; 



advi seLi st , concat (aXemp) ; 

} 
} 

} 

return false; 

} 

function _EMLfi reEvent (strEvent) 

if (typeof (this._events [strEvent]) != 'undefined') 
{ 

var bReturn = true; 

for (var i=0; i < this. _events[strEvent] -length; i++) 

_EM fireEvent(this._events [strEvent] [i] .funcxocall) ; 

} 

} 
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function _EM_getEventCount() 

var nLength = 0; 

for (var event in this._events) 

nLength++; 
return nLength; 

} 

function „EM_get Event (nindex) 
{ 

var i = 0; 

for (var event in this._events) 

if (nindex == i) 

return event; 

return ' ' ; 

} 

function _EM_generateClientHandler(strName, strEvent) 

^ return "thisPage.„fi reEventC" + strName + + strEvent + 

} 

f uncti on _EM_gene rated i entHandl ers (strName) 

var strHandlers = ' ' ; 

for (var event in this._events) 

StrHandlers += ' ' + event + 
-thisvgefrer^tecli entHandl er (strName, event) + ' return false;"'; 
return strHandlers; 

} 

} // end of „EM_Prototype function 

// shared function for firing events, used by other script components 
function _EM fi reEvent(funcToFi re) 

^ if (typeof (funcToFire) == 'string') 

eval (f uncToFi re) ; 
else if (typeof (funcToFi re) == 'function') 
funcToFi re() ; 

} 

// shared function for mapping client events to server eventhandlers 

f uncti on _EM oncl i entevent (strName , strEvent) 

{ // validate strName is an existing object 

var object = null ; 

if (typeof(RuntimeObject) != 'undefined') 

{ // use global namespace to acquire object of 'strName 

var objects = RuntimeObject(strName) ; 
object = obj ects [strName] ; 



if (object != null && typeof (object) 'object' && 
typeof (object. _objEventManager) == 'object') 

object._objEventManager.fi reEvent (strEvent) ; 

} 

</SCRIPT> 
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II -kif -k ic-k^ifkiti:ifki<i;ifit^ir-}t -k it ic -k it it -It it ic it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it « » < B R > 

// Microsoft Script Library<BR> 

// visual interDev 6.0 Scripting object Model framework for client<BR> 
// Copyright 1998 Microsoft Corporation. All Rights Reserved. <BR> 
// <B>Do not modify in design view. Switch to source view.</B><BR> 

^ I <ff -ii-ii^ if -i^ -it it it it it it it it it it it it it it -kit it it it it it it it it it it it it it it it it it it it it it it it it i^ R> 

// <SCRIPT> 

var thisPage = new _S0M0bject; 
function „SOMObject() 
{ //public members 

this.invokeMethod = _SOM_i nvokeMethod ; 

this.navigateURL = „SOM_navigateURL; 

this.setstate = _SOM_setState; 

this.getstate = _S0M_getstate; 

this. advise = _SOM_advise; 

this.unadvise = „SOM„unadvise; 

this. cancel Event = false; 

this.navigateTarget = window; 

//events 

PAGE_ONBEFORESERVEREVENT ' onbefo reserve revent ; 

//private members 

this._fireEvent = „SOM fireEvent; 

this.„buildURL = _SOM buildURL; 

this.^extractvalue = _SOM extractvalue; 

this.^insertvalue = „SOM insertvalue; 

this._adviseList = null; 
this._nLastAdviselD = 0; 

f uncti on"'_SOM_i nvokeMethod (u rl , method , args) 

^ if (url == ") url = this, .location; 

thi s . navi gateURL (thi s . _bui 1 dURL (u rl , method , args) ) ; 

} 

function „SOM_navigateURL(url) 

^ // if navigating to another frame, change a relative url to an absolute url 

if (this.navigateTarget != window) 

^ if (url.indexofCV") ==0). 

url = window. location. protocol + // + 
window. location. host name + url; 
else 

var nProtocol = url .indexof ("://") ; 
var nParameters = url .indexOf ("?") ; 



nProtocol)) 



if (nProtocol == -1 || (nParameters != -1 && nParameters < 
{ 



thi sURL . 1 astlndexof ("/")+!) ; 

} 

} 

} 



var thi SURL = window. location. href; 

if (thisURL.substrinq(thisURL. length, -1) != V") 
thisURL = thisURL.substring(0, 



url = thisURL + url 
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if (typeof (this. navigatGTarget- document. thisForm) == 'object' && 
typeof (thi s . navi gateTarget . document . thi sForm . _method) == ' ob j ect ' ) 
{ // use form submit to POST state back to server 

this. navi gateTarget. document. thi sForm. action = 

thi s . navi gateTarget . 1 ocati on . h ret ; 

this. navigateTarget. document. thisForm. _method. value = uri 

thi s . navi gateTarget . document . thi sForm . submi t () ; 

} 

else 

this. navi gateTarget. location. href = url ; 

} 

f uncti on _SOM_setState (st rName , val ue) 

if (typeof (document. thisForm) == 'object' && 
typeof (document. thi sForm.„thisPage_state) == 'object') 
{ // insert state into hidden field 

return 

thi s -„i nsertval ue(document . thi sForm.^thi sPage_state , strName , val ue) ; 
} 

return false; 

} 

function _SOM_getState (strName) 

if (typeof (document. thi SForm) == 'object' && 
typeof (document. thisForm. _thisPage_state) == 'object') 

{ // extract state from hidden field 

var strstate = document .thisForm. _thisPage_state. value; 
. : - * return thi s._extractvalue(strstate,st rName) ; 

return null ; 

} 

f uncti on .SOM^advi se(5t rEvent , f uncToCal 1 ) 

if ((typeof (strEvent) == 'string') && 

(strEvent == page_onbeforeserverevent) && 
(funcToCall != null)) 

if (this._adviseList == null) 

this._adviseList = new Object; 
thi s ._advi seLi st C++thi s .jLastAdvi selD] = f uncToCal 1 ; 
return this._nLastAdviseID; 

} 

return -1; 

} 

function „SOM_unadvi se(st rEvent , nAdvi selD) 

if (this._adviseList != null && 

(typeof (strEvent) == 'string') && 

(strEvent -= PAGE_ONBEFORESERVEREVENT) && 

(nAdvi selD != null)) 

^ if (thi s._adviseLi St [nAdvi selD] != null) 

thi s.^adviseLi St [nAdvi selD] = null; 
return true; 

} 

return false; 
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} 

f uncti on _SOM f i reEvent (st rName , strEvent) 

// fire client-side onbeforeserverevent hook 

if (typeof (thisPage_onbeforeserverevent) === 'function') 

{ // fire default onbeforeserverevent handler 

thisPage_onbefore5erverevent(strName, StrEvent) ; 

if (this._adviseList != null) 

{ // fire handlers in advise list 

for (var i = 1; i <= this._nLastAdvi selD; i++) 

^ var adviseType = typeofCthis._adviseList[i]) ; 

if (adviseType == 'function') 

thi s . „advi seLi st [i ] (st rName , strEvent) ; 
else if (adviseType == 'string') 
eval (thi s ._advi seLi st [i ] ) ; 

} 

} 

// propogate event to server if not cancelled 

if (this. cancel Event == '0' || this. cancel Event 'false') 

^ //alert ('_fireEvent(' + strName + ',' + strEvent + ')'); 

thisPage-invokeMethodC ' , '.EM onclientevent' ,new 

Array (strName , strEvent)) ; 

this. cancel Event = false; 
function _SOM escapePl us (value) 

^ for (var i = 0, newValue = i < value. length; i++) 

newvalue += (value. charAt(i) == '+' ? '%2B' : value.charAt(i)) ; 
return newvalue; 

} 

function _SOM buildURL(url , method, args) 

if (typeof (method) == 'string') 

url += '?_method=' + method 

var params = '&pcount=0'; 

if (args != null && args. length) 

{ // add parameters 

params = '&pcount=' + args. length 
for (var i = 0; i < args. length; i++) 

var arg = args[i] ; 
if (arg != null) 

params += '&p' + i + + 

_SOM escapePl us(escape(arg)) ; 

} 

url += params; 
return url ; 

} 

function _SOM extractvalue(s,name) 

^ var chstart = s.indexof (name + '='); 
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if (chstart != -1) 

chstart name. length + 1; 

var chEnd = s.indexOf('&' , chstart) ; 

if (chEnd == -1) 

chEnd = s. length + 1; 
return unescapeCs.substring(chstart, chEnd)) ; 

} 

return null ; 



f uncti on _SOM i nsertVal ue(sPt r , name , val ue) 

var s = sPtr. value; 

var chstart = s.indexof (name + '='); 

if (chstart == -1) 

if (value != null) 

if (s. length > 0) 
s 

s += name + + value; 

} 

} 

else 

chstart += name. length + 1; 

var chEnd = s.indexOf('&' , chstart) ; 

if (chEnd == -1) 

,^ chEnd = s. length + 1; 

' ' " if (value == null) 

s = s.substring(0,chstart-name.length-l) + 
s.substring(chEnd, s.length+1) ; 

else ^ ^ 

s = s-substring(0,chstart-l) + + escape(value) + 
s . subst ri ng (chEnd , s . 1 ength+1) ; 

sPtr. value = s; 
return true; 

} 

function FunctionO 

{ // required to support JavaScript 1.0 ( IE3 ) 

var args = Function. arguments; 

var nargs = arqs. length - 1; 

var params = ' ; 

for (var i=0; i < nargs; i++) 

{ // extract expected arguments 

if (i != 0) params += /; 

params += args[i] ; 

for (var i=0; i < 16; i++) 

{ // support upto 16 optional arguments 

if (i != 0 II nargs != 0) params += ','; 
params += '_tp' + i ; 

return eval ('function tC + params +'){'+ args[nargs] + '} t'); 

// define Function routine for JavaScript 1.0 ( IE3 ) 
if (typeof (Function) != 'function') 
Function = Function; 
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<SCRIPT RUNAT=SERVER LANGUAGE=" JavaScri pt"> 

1 1 i* •{( if ic if it ic if it i: it it it ic it it i( it ic if it i( it i{ it i( i( "if -k ie it it it i! "if n ie it it it if it it it it it it it it it it it it it it it it it it it it it it it it it it it it it 

// MSL : Microsoft Scripting Libary 

// visual interDev 6.0 Recordset Object for ASP 

// Copyright 1998 Microsoft Corporation. All Rights Reserved. 

ititif it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it -kit it it it it it it it it it if it it it it it it it it it it it it it it it 

function CreateRecordset(strName,funclnit,obj Parent) 

if Ctypeof (strName) != 'string' ll strName == 
return null ; 

var objRecordset = new .RecordsetCstrName) ; 
eval (strName + ' = objRecordset'); 
// always fire init for recordset 
objRecordset ..funclnit = funclnit; 

thisPage.advise(PAGE_ONlNiT, StrName + ' ,_restoreStateC) ' , 10) ; 
return objRecordset; 

} 

function _RecordsetCstrName) 

^ if (typeof CbRSPrototypeCalled) == 'undefined') 
_RS PrototypeO ; 

// public members 
this. id = StrName; 
this. name = strName; 
this. fields = null ; 
.-^.this.absolutePosition = 0; 
' " thTs.BOF = true; 

This. EOF = true; 
this.maintainstate = true; 

// private members 
this.__rsADO = null ; 
this._count = -1; 
this._allowUpdate = false; 
this._objDBConn = null; 
this._bookmark = 0; 
this._params = null; 
t hi s._bcancel Update = false; 
this.„bFiringOnBeforeUpdate = false; 
this.^bAddNew = false; 
this.„bAddNewlmmediate = false; 
this._bExecuted = false; 
this.^strSQL = " ; 

// advise for default eventhandlers 
this.„objEventManager = CreateEventManagerO ; 

thi s .„ob j EventManager . advi seDef aul tHandl er (thi s . name , rs_ONBEFOREOPEN) ; 

// set default handlers AFTER all other controls are initialized 

this Page. advi se(PAGE_0NlNlT, this. name + ' .advi seDef aul tHandl erC" + 
thi s. name + ' " ,RS_0NR0WENTER) ' ,-10) ; , . ^ ^ ^.m 

thi sPage. advi se(PAG£_0NINlT, this. name + ' .advnseDefaultHandlerC 
thi s, name + ' " ,rs„ondatasetchanged) ' ,-10) ; ... , ^.m 

t hi sPage. advi seCPAGE_ONlNlT, this. name + ' .adviseDefaultHandlerC 
thi s . name + ' " , RS.ONDATASETCOMPLETE) ' , -10) ; . . , 

thisPage.advise(PAGE_ONlNlT, this. name + ' .advi seDefaul tHandl erC 

thi s. name + ' " ,RS_0NR0WEXIT) ' ,-10) ; . , . ^ . ^n, 

thi sPage. advi se(PAGE_0NlNlT, this, name -f .advi seDef aul tHandl er( 

thi s. name + ' " ,RS_0NBEF0REUPDATE) ' ,-10) ; ^ , . ^ ^ ^n, 

thi sPage. advi se(PAGE_0NlNlT, this. name + .advi seDef aul tHandl erC 
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thi s . name + ' " , RS.ONAFTERUPDATE) ' , -10) ; 

} 

function _RS PrototypeO 

{ 

//public members 

_Recordset- prototype. getCount = _RS_getCount ; 
„Recordset. prototype. moveNext = _RS„moveNext ; 
_Recordset. prototype. movePrevious = _RS„movePrevious; 
_Recorclset. prototype. moveFirst = _RS_moveFi rst ; 
.Recordset. prototype. moveLast = _RS„moveLast ; 
_Recordset. prototype. moveAbsolute = _RS_moveAbsolute; 
^Recordset. prototype. move = _RS„move; 
„Recordset. prototype. updateRecord = „RS_updateRecord; 
„Recorclset. prototype, cancel Update = _RS_cancel Update; 
.Recordset. prototype. addRecord = _RS_addRecord; 
.Recordset. prototype -addlmmedi ate = _RS_addimmediate; 
.Recordset. prototype. del eteRecord = _RS_deleteRecord; 
.Recordset. prototype. advise = .RS„advise; 
„Recordset. prototype. unadvise = .RS.unadvise; 

.Recordset . prototype . advi seDef aul tHandl e r = _RS_advi seDef aul tHandl er ; 

.Recordset. prototype. getRecordSource = .RS^getRecordSource; 
.Recordset. prototype. setRecordSource = .RS.setRecordSource; 
.Recordset. prototype. open = „RS_open; 
.Recordset .prototype. isopen = .RS.isOpen; 
.Recordset. prototype. close = .RS.close; 

.Recordset. prototype. getconnectst ring = .RS.getConnectString; 
.Recordset. prototype. getSQLText = _RS_getSQLText ; 
--^R^ecordset. prototype. setSQLText = _RS_setSQLText ; 
Recordset .prototype, requery = .RS.requery; 
.Recordset. prototype. setBookmark = .RS.setBookmark; 
.Recordset. prototype. getBookmark = .RS.getBookmark; 
.Recordset. prototype. setParameter = .RS.setParameter ; 
.Recordset. prototype. getParameter = „RS.getParameter ; 
.Recordset. prototype. isDHTMLAware = .RS.isDHTMLAware; 
.Recordset. prototype. getOHTMLDataSourcelD = .RS.getDHTMLDataSourcelD; 

//events 

RS.ONBEFOREOPEN = * onbeforeopen ' ; 
RS.ONROWENTER = ' onrowenter " ; 
RS.ONROWEXIT = 'onrowexit'; 
RS.ONDATASETCHANGED = 'ondatasetchanged ' ; 
RS.ONDATASETCOMPLETE = ' ondatasetcompl ete ' ; 
RS.ONBEFOREUPDATE = ' onbeforeupdate ' ; 
RS.ONAFTERUPDATE = 'onafterupdate' ; 

//private members 

.Recordset, prototype. .syncBOFandEOF = .RS_syncBOFandEOF; 

.Recordset .prototype. _fi reEvent = .em fireEvent; 

.Recordset .prototype, .preservestate = _RS preserveState; 

.Recordset. prototype. .restorestate = .RS restorestate; 

.Recordset .prototype. .hasstate = .RS hasstate; 

.Recordset. prototype. „isEmpty = .RS isEmpty; 

.Recordset. prototype. .resetMembers = .RS resetMembers; 

.bRSPrototypeCalled = 1; 

//scope implementation to .RS Prototype function 

function .RS.getCountO 

if (this. .count < 0) 
{ 
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if (this.isopenO) 

if (Ithis.BOF II ! this. EOF) 

this._count = this._rsADO.RecordCount; 

if (this._count <= 0) 

{ 

var curPos = 



thi s . _rsADO . Absol utePosi ti on ; 



if (curPos > 0) 
{ 



this. „rsADO . MoveNext () ; 



curPos; 



this._count = 0; 
this. _rsADO . MovePi rst () ; 
while (!this._rsADO.EOF) 

{ 

this._count-f4-; 



this. _rsADO . Absol utePosi ti on 



} 

else 



} 



} 



} 

return 0; 

} 

return this._count; 



this._count = 0; 
return this._count; 



function „RS_moveNext(nDi recti on) 

if (typeof(nDi recti on) == 'undefined') 
nDi recti on = 1; 

if C!this._isEmptyC)) 

thi s ._obj EventManager . f i reEvent (RS_0NR0WEXIT) ; 
thi s._rsADO. Move (nDi recti on) ; 
thi s .„syncB0FandE0FO ; 
if (this. EOF I I this.BOF) 

return false; 
thi s . f i el ds ._reset (thi s . _rsADO) ; 
this._objEventManager,fi reEvent (RS_0NR0WENTER) ; 
return true; 

} 

return false; 

} 

function _RS_movePrevious() 

{ return this.moveNext(-l) ; } 

function _RS_moveLast(bReverse) 

if (!this.„isEmpty()) 

thi s ._obj EventManager . f i reEvent (rs_0NR0WEXIT) ; 

if ((bReverse + "') == 'true') 
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this._rsADO.MoveFi rst() ; 

else 

this._rsADO.MoveLastC) ; 

thi s ._syncBOFandEOF() ; 

thi s . f i el ds ._reset (thi s ._rsADO) ; 

thi s ._obj EventManager . f i reEvent (RS_0NR0WENTER) ; 

return true; 

return false; 

} 

function _.RS_moveFi rst() 

{ return this.moveLast(true) ; } 

f uncti on „RS_moveAbsol u te (nlndex) 

if C!this._isEniptyO && 

typeof (nlndex) == 'number') 

this._obj EventManager.fi reEvent (RS_0NR0WEXIT) ; 

this._rsADO.AbsolutePosition = nlndex; 

thi s ._syncBOFandEOF() ; 

thi s , f i el ds . „reset (thi s . _rsADO) ; 

this._objEventManager.fi reEvent (RS_onrowenter) ; 

return true; 

return false; 

} 

function _RS_move (nlndex) 
{ // move relative to current record 

if (!this._isEmpty() && 

typeof (nlndex) == 'number') 

thi s._obj EventManager, fi reEvent (RS_0NR0WEXIT) ; 
thi s . _rsADO , Move (nlndex) ; 
this.„syncBOFandEOF() ; 
thi s . f i el ds .„reset (thi s .„rsADO) ; 
this._objEventManager.fi reEvent (rs_onrowenter) ; 
return true; 

} 

return false; 

} 

function _RS„updateRecord() 

//bFi ringOnBeforeupdate: if the user is calling this function from 
//the OnBeforeUpdate, the call should be rejected. 
if (this..allowUpdate && (! this._isEmpty() || 
this._bAddNewlmmediate) && ! this, _bFi ringOnBeforeupdate) 

if (this._bAddNewlmmediate) 

if (this._count >= 0) 
-i-+this._count; 
this._rsADO.AddNew() ; 
this.fields._isvalid = true; 

} 

thi s._bFi ringOnBeforeupdate = true; 

this._objEventManager.fi reEvent (RS_0NBEF0REUPDATE) ; 
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this._bFiringOnBeforeUpdate = false; 
if (!this._bcancel Update) 

this. _rsADO . update () ; 

if (this._rsADO-LockType == 4) 

this._rsADO.UpdateBatchC) ; 

if (this._bAddNewlmmediate) 

thi s .„syncBOFandEOF() ; 

this._bAddNewlmmediate = false; 
thi s , _ob j EventManager . f i reEvent (RS_0NAFTERUPDATE) ; 
return true; 



thi s._bcancel Update = false; 



recordset 



} 

else 

} 

return false; 

} 

function _RS_cancel Update () 

{ 

if (this._allowUpdate && this.isOpenO) 
{ 

//adEditAdd = 2 

if Cthis._rsADO,EditMode == 2) 

{ 

if (this._bAddNewlmmediate) 
{ 

^ if (this._count >= 0) 

--this._count; 

} 

if (!this._isEmptyO) 

thi s ._rsADO, Cancel Update () ; 

thi s ._syncBOFandEOF() ; 

thi s . f i el ds . _reset (thi s . _rsADO) ; 

} 

else 

//ADO doesn't support cancel Update with empty 



} 

else 



this. fields. _isvalid = false; 

} 

//adEditlnProgress = 1 

if (this._rsADO.EditMode == 1) 

thi s ._rsADO. Cancel updateO ; 

this._bAddNewlmmediate = false; 
thi s._bcancel Update = true; 

thi s . _ob 3 EventManage r . f i reEvent Crs_ONROWENTER) ; 
return true; 



return false; 



function „RS_addRecordC) 
{ 

Z/bFiringOnBeforeUpdate: if the user is calling this function from 
//the OnBeforeUpdate, the call should be rejected, 
if (this.__allowUpdate && this.isOpen() && 
! thi s . _bFi ri ngOnBef oreupdate) 

Page 5 



RECORDSET. ASP 

this._bAddNewlmmediate = false; 

thi s ._obi EventManager , f i reEvent Crs_onrowexit) ; 

// set flag to indicate new record for subsequent update 

this._bAddNew = true; 

t hi s . f i el ds . _reset (thi s . ^rsADO) ; 

this.fi el ds.„newRecord = true; 

thi s ._ob j EventManager . f i reEvent Crs_ONR0WENTER) ; 

return true; 

} 

return false; 

} 

function _RS_addlmmediate(fieldList , fieldvalues) 

if (this.^allowupdate && this,isOpen() && 
! thi s . „bFi ri ngOnBef oreiipdate) 

this._bAddNewlmmediate = false; 
this._objEventManager.fi reEvent (RS_0NR0WEXIT) ; 
this._rsADO.AddNew(fieldList, fieldvalues); 
if Cthis._rsADO.LockType =- 4) 

thi s . „r sADO . UpdateBatch Q ; 
thi s ._syncBOFandEOFC) ; 
if (this._count >= 0) 

++this._count ; 
this. f i el ds . „reset (this. _r sADO) ; 
thi s ._obj EventManager. fi reEvent (RS_0NR0WENTER) ; 
return true; 

} 

return false; 

7 

function _RS_deleteRecord() 

if (this.^allowupdate && !this._isEmpty()) 

this._bAddNewlmmediate = false; 
this._objEventManager.fi reEvent (RS.ONROWEXIT) ; 
this.^rsADO.DeleteO ; 
if (this._rsADO.LockType == 4) 

thi s .„rsADO. UpdateBatch () ; 
this. _rsADO . moveNext () ; 
if (thi5.„rsAD0.E0F) 

this.„rsADO.movePrevious() ; 

thi s ._syncBOFandEOF() ; 
if (this._count >= 0) 
--this._count; 
thi s . f i el ds ..reset (thi s ._rsADO) ; 
thi s . __ob j EventManager . f i reEvent (RS_ONROWENTER) ; 

return true; 

} 

return false; 

} 

function _RS_advi se(st rEvent , f uncToCal 1 ) 
{ 

if (this.isOpenO && 

(st rEvent == RS_ONROWENTER | | St r Event 
RS_ONDATASETCOMPLETE | 1 St r Event == R S.ON DATA S ETC HANG ED)) 
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{ //fire immediately if data is available 

t hi s . „f i reEvent (f uncToCal 1 ) ; 

return thi s ._obj EventNianager . advi se(st rEvent , f uncToCal 1 ) ; 

} 

function _RS_unadviseCst rEvent, nAdviselD) 

^ return thi s ,_obj EventManager . unadvi seCst rEvent , nAdvi selD) ; 

} 

function _RS_advi seDefaultHandlerCstrName, strEvent) 
var nAdvi selD - 

thi s ._obi EventManager . advi seoef aul tHandl er (strName , st rEvent) ; 

if (this.isOpenO && nAdviselD > 0 && 

(strEvent == RS.ONROWENTER | | strEvent == 

RS_ONDATASETCOMPLETE || StrEvent RS„ONDATASETCHANGED)) 

{ // fire immediately if data is available 

var funcToCall = strName + + strEvent + C) ; 
this. _„f i reEvent (f uncToCal 1 ) ; 

return nAdviselD; 

} 

function _RS_getRecordSourceO 

{ return this._rsADO; } 

^y/f unction _RS_setRecordSourceCrsADO) OR 
* ' ' flTnction _RS_setRecordSourceCstrConn, strSQL) 

T 

if (typeof (strconn) == 'string') 

{ // given a connect and SQL string 

thi s._resetMembers (true); ^ , ,^ 

this._objDBConn = server .createObjectC'ADODB. Connection ); 

this._objDBConn.ConnectionString = strConn; 

this._objDBConn.openO ; 

if (!this.setSQLText(strSQL)) 
return false; 

else if (typeof(strconn) == 'object') 

// given an ADO object 
var strBook = this._bookmark; 
this.„objDBConn = null; 
thi s ._resetMembersCtrue) ; 
this.^bookmark = strBook; 
this._rsADO = strconn; 

} 

else 

return false; 

if (this.^rsADO.LockType == 1) 

this._allowUpdate = false; 

else 

this.„allowUpdate = true; 
if (this.isOpenO) 

^ this. fields = createFields(this._rsADO) ; 

if (this._bookmark != 0) 

thi s . setBookmark(thi s .^bookmark) ; 
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else 

this._5yncB0FandE0F() ; 
this._objDBConn = this.„rsADO.Activeconnection; 

this._objEventManager.fi reEventCRS_ONROWENTER) ; 
this._objEventManager.fireEvent(RS_ONDATASETCHANGED) ; 
this.„objEventManager.fireEventCRS_ONDATASETCOMPLETE) ; 



function _RS_isOpenC) 

if ((this._rsADO && this._rsADO. state != 0) II 
(thi s ._bExecuted)) 

return true; 
return false; 

} 

function „RS_open() 

if (this.„rsADO != null) 

if (Ithis.isOpenQ) 

^ this._objEventManager.fi reEventCRS^ONBEFOREOREN) ; 

, . ^ if (this._params != null) 

for (var i=0; i < thi s._params. length; i++) 

if (typeof Cthis._params[i]) != 

'undefined') 

this._rsADO.ActiveCommand.Parameters(NumberCi)) .value = this._params[i] ; 

} 

} 

// force AbsolutePosition to work in server-side 

if (this._rsADO.CursorLocation 2) 

this._rsADO.PropertiesC'iRowsetScroll ') = 



cursor for SQL 
true; 



// fire initial events 



// double-check after ONBEFOREOPEN is fired 

if (ithis.isOpenO) 

thi s._rsADO. Open C) ; 

this._obiDBConn = this.„rsADO.ActiveConnection; 
this. fields = createFi elds (thi s. _r sADO) ; 
this._bExecuted = true; 

if (thi5._bookmark != 0) 

thi s . setBookmarkCthi s ._bookmark) ; 

else 

thi s ._syncBOFandEOFC) ; 

thi s ._ob j EventManager . f i reEvent (RS_ONROWENTER) ; 
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this. _ob j EventNianage r . f i reEven t CRS_0NDATASETCHANGED) ; 

this._objEventManager.fi reEvent(RS_ONDATASETCOMPLETE) ; 

return true; 

^ } 
return false; 

} 

function _RS_close() 

if (this.isOpenO) 

this._rsADO.CloseC) ; 

this._resetMembers(true) ; 
return true; 

} 

function _RS_getConnectStringC) 

if (this._rsADO != null) 

return thi s ._rsADO. Acti veconnection , connectionstn ng ; 
return ' ' ; 

} 

function „RS_getSQLTextO 

if Cthis.__rsADO != null) 

- return thi s._rsADO. Acti veCommand.CommandText; 

return ' ' ; 



function _RS_setSQLTextCstrSQL) 

if (typeof (strSQL) == 'string') 

if (Ithis.isOpenQ) 
{ // recordset is not open 

if (this._rsADO != null) 
{ // try to use existing recordset 

var objDBCmd = thi s._rsADO. Acti veCommand; 

//adcmdunknown = 8 

objDBCmd.CommandType = 8; 

obiDBCmd.CommandText = strSQL; 

this._strSQL = StrSQL; 

return true; 

} 

// create an ADO recordset 
if (this._objDBConn != null) 

var objDBCmd = 

serve r . C r eateob j ect ( ' adodb . command ' ) ; 

//adcmdunknown = 8 

objDBCmd.CommandType = 8; 

objDBCmd.CommandText = strSQL; 

objDBCmd. Acti veconnection = this._objDBConn 

this._rsAD0 = 

Server . CreateObjectC 'ADODB . Recordset ' ) ; 

thi s.^rsADO. Source = objDBCmd; 
thi s . setRecordSourceCthi s ._rsAD0) ; 
return true; 
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} 

function 
{ 



} 

else 
{ 



} 

return false; 



// recordset is open, set CommandText to strSQL 
// strSQL must be valid for current CommandType 
t hi s._rsADO. Act ivecommand. CommandText = strSQL; 
this._strSQL = StrSQL; 
return true; 



_RS_requery() 
(this.isOpenC)) 



if 
{ 



} 



} 

return 



this._rsADO.Requery() ; 

this.. objEventManager.fi reEvent(RS_ONROWEXiT) ; 
thi s ._resetMembersO ; 
thi s ._syncBOFandEOF() ; 
thi s . f i el ds . _reset (thi s . _r sADO) ; 
this._objEventManager.fi reEvent(RS_ONROWENTER) ; 
this._objEventManager.fi reEvent(RS_ONDATASETCHANGED) ; 
this._objEventManager.fi reEvent(RS_ONDATASETCOMPLETE) ; 
return true; 

false; 



^ncti on _RS„setBookmark(bookmark) 

var nAbsPos = bookmark; 
var strKeys = ' ' ; 

var nsemi = bookmark. i ndexOf (';') ; 
if (nsemi !^ -1) 

{ // bookmark may contain keyfields for validation 

nAbsPos = bookmark. substringCO, nsemi) ; 
StrKeys = bookmark. substringCnsemi+1, bookmark. length) ; 

if (!isNaN(parseint(nAbsPos))) 

this._bookmark = bookmark; 

if (this.isOpenC) && ! (this -_rsADO. EOF && this._rsADO.BOF)) 
{ // reset to previous absolute position 

this._objEventManager.fi reEvent(RS_ONROWEXlT) ; 
var rsADO = this._rsADO; 
var keyFields = null ; 
var bseek = (strKeys. length > 1); 
if (bseek) 



{ 



StrKeys . substri ng(nEq+l, nSemi) ; 
unescape(keyvalue) ; 



// extract key field values from bookmark 
keyFields = new object; 
var nEq, nSemi , keyName, keyValue; 
while (strKeys. length > 1) 
{ // extract keyfield name/value pairs 

nEq = StrKeys, indexOf( '=') ; 
nsemi = strKeys.indexOf (' ; ') ; 
keyName = strKeys. substri ng(0, nEq) ; 
keyValue = 
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St rKeys . subst ri ng (nSemi +1 , st rKeys . 1 ength) ; 

If CnAbsPos > 0) 

rsADO.AbsolutePosition = (nAbsPos * 1); 
if (bseek) 

{ // validate position using key field 

values 

bseek = false; 

for (var keyName in keyFields) 
{ 



(typeof (rsADO.Fields(keyName)) != 'undefined' && 
!= rsADO. Fields (keyName)) 



if 

{ 
} 



} 



} 



else if (nAbsPos == -2) 

rsADO.MoveFi rstC) ; 
else if (nAbsPos == -3) 
rsADO.MoveLastO ; 



keyFi elds [keyName] 



bseek = true^ 
break; 



// adPosBOF 
// adPosEOF 



if (bseek) 



record 



'undefined') 



{ 



// use key fields to seek to bookmarked 

var strwhere = ' ' ; 
var nKeys = 0; 

for (var keyName in keyFields) 

if (typeof (rsADO. Fields (keyName)) != 



{ 



keyFi elds [keyName] ; 

r sADO . Fi el ds (keyName) . type ; 

the following field types 

adLongvarChar, adwchar, advarwchar, adLongVarWChar , 
advariant, aduseroefined, 
adDBTimeStamp 



var key Value = 
var keyType = 

// put single quotes around 
// adchar, advarchar, 
// adBSTR, adDate, adGUlD, 
// adDBDate, adDBTime, 



if (keyType == 129 i 1 
keyType == 200 I 1 keyType 201 I I keyType == 130 | | keyType 202 i | keyType == 

" keyType == 8 | | 

keyType == 7 | | keyType ==72 | | keyType ==12 | | keyType == 132 M , , 

keyType ==133 II 

keyType == 134 | | keyType == 135) keyValue = + 

keyvalue + ^ ^> ^ 

if (nKeys > 0) strwhere += 

' AND ' ; . . I . 

strwhere += keyName + + 
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Filter 



rsADO. Bookmark; 

strP.reyEilter; 
tmpBookmark; 



strPrevFilter; 
record 

CnAbsPos * 1) ; 



} 

else 
{ 



} 



nKeys++; 



// abort, field names do not 



nKeys = 0; 
break; 



} 

var bSeekFailed = false; 
if (nKeys == 1) 

{ // single key field, seek using Find 

rsADO.MoveFi rstC) ; 
rsADO.FindCstrwhere) ; 
if (rsADO.AbsolutePosition < 1) 
bSeekFailed = true; 

else if (nKeys > 1) 

{ // multiple key fields, seek using 

var StrPrevFilter = rsADO. Filter ; 
rsADO. Filter = strwhere; 
if (rsADO.RecordCount) 

var tmpBookmark = 

rsADO. Filter = ' ' ; 
rsADO. Filter = 



} 

else 
{ 



} 



rsADO. Bookmark = 



// seek failed 
bSeekFailed = true; 
rsADO. Filter = " ; 
rsADO, Filter = 



If (bSeekFailed) 
{ // use previous position OR first 

if (nAbsPos > 0) 

rsADO.AbsolutePosition = 

else 

rsADO.MoveFi rst() ; 
this._allowUpdate = false; 

} 

} 

this.__syncBOFandEOF() ; 

this.„obj EventManager.fi reEvent(RS_ONROWENTER) ; 



} 

function _RS„getBookmark() 
if (this.isOpenO) 

{ // use absolute position to bookmark across recordset 
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sessions 

var rsADO = this._rsADO; 

this.^bookmark = this.absolutePosition + ; ; 

if (ithis.BOF && Ithis.EOF) 

{ // look for key fields 

var bCursorLoc = rsADO.CursorLocation; 

for (var i=0; i < rsADG. Fields. count; i+-i-) 

{ // store key fields to validate absolute 

position , . _ . 

var bKeyField = 

(rsADO.FieldsCi).Properties('KeyColunin') ==1); . 

if (bKeyField) 

{ // append keyfield name/value pairs 

to bookmark fieldvalue := rsADO.Fields(i) ; 

var fieldType = 

rsADO.Fields(i).type; ^^^^^.^ ^^^^.p^ formating for the 

f 01 1 owi ng f i el d types : ^^^^^^^^ ^ ^^^^^^^^ ^ ^^^^^ . _ 

adDBTimeStamp, adBinary ((fieldType == 7) | | (fieldType 

== 133) 11 (fieldType == 134) || (fieldType == 135)) ^^.^ ^^^^^^^^ 

rsADO.Fields(i).nanie . ■ = ' . escape(Server.HTMLEncodegieldV^^^^^^ ^^^^^ 

to do ^^^^ (fieldType != 128) 

this.„bookmark += 

_rsADa.Fi'elxlsCi).name + ' = ' + escape (fieldvalue) + 

} 

} 

return this,_bookmark; 

} 

function _RS_setParameter(nlndex, value) 

^ if (typeof (nindex) == 'number' && typeof (value) != 'undefined') 

^ if (this.isOpenO) 

this. _rsADO . Acti veCommand . Parameter s (Number (nindex) ) . val ue = val ue ; 

else 

^ if (this._params == null) this.^params = new 

this.„params [nindex] = value; 

} 

return true; 
return false; 

} 

f uncti on „RS_get Parameter (nindex) 

^ if (typeof (nindex) == 'number') 

^ if (this.isOpenO) 

return 

thi s _rsADO. Acti veCommand . Parameters (Number (nindex)) . val ue ; 

else if (this.params != null) 
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return this._params[nlndex] ; 

} 

return ; 

} 

function _RS_isDHTMLAwareO 
{ return false; } 

f uncti on _RS„getDHTMLDatasourceiD() 
{ return ' ' ; } 

function _RS syncBOFandEOF() 

if (this.isOpenO) 

^ this. EOF = this._rsADO.EOF; 

this.BOF = this.„rsADO.BOF; 

this.absolutePosition = thi5._rsADO.Abso I utePositionj 

} 

} 

function _RS preservestateQ 

^ if (this.maintainstate) ^. 

{ // preserve state in hidden field 

var bstate - false; 
var state = new Object; 

if (this._bAddNew) 

bstate = true; 
state. _addNew = true; 

if (this.isOpenO) 

bstate true; 
state.„bOpen = true; 
if (this.„strSQL 1= ") 

state. _strSQL = this._strSQL; 

if Cthis.„params != null) 

^ bstate = true; 

state. „pCount =0; ^ ^ 

state. _pCount = this._params. length; 
for (var i=0; i < state. _pCount; 1++) 

^ if (typeof(this.__params[i]) !- 'undefined*) 

5tate['p' + i] = this._params[i]; 

} 

if (bstate) , ^ ^. ^ ^ . 

return thi sPage . persi ststate (thi s . name , state) , 

return false; 

} 

function „RS restoreStateO 

var r = false; . 
thi s ._f i reEvent (thi s ..f unclni t) ; 

if (this.maintainstate) 
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// attempt to restore previous state 
var state = thisPage.unpersistStateCthis .name) ; 
if (state != null) 
{ // restore previous state 

if (state. _addNew != null) 

this.„bAddNewlmmediate = true; 

if (Ithis.isOpenO) 

if (state -_strSQL != null) 

thi s . setSQLText (state ._strSQL) ; 

if (typeof (state. _pCount) != null) 
{ 

state. _pCount = 

if (state. _pCount > 0) 

this._params = new Array; 
for (var i=0; i < 



{ 



if (typeof (state['p' 



} 



} 



} 



if (state. _bopen 1= null) 
this. open 0 ; 



r = true; 



} 



} 

return r; 



function _RS hasStateO 

if (this.maintainState) 

return thi sPage . i sStatePersi sted(thi s . name) ; 
return false; 

} 

function _RS isEmptyO 

^ return (Ithis.isOpenO i| (thi s. BOF && this. EOF)) 

} 

function _RS resetMembers(bAn) 

this._count = -1; 
this.absolutePosition = 0; 
this.^bookmark = 0; 
this._bAddNew = false; 
this._bAddNewlmmediate = false; 
thi s._bcancel update = false; 
this.„bFiringOnBeforeupdate = false; 
if (typeof(bAll) 1- 'undefined' && bAll) 
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this.BOF = true; 
this. EOF = true; 
this._bExecuted = false; 
this. fields = null ; 
this._strSQL = " ; 
this._params = null ; 

} 

} 

} // end of _RS Prototype function 

1 1 ^ -ir ^ * ^ * * * -it * * * "it A- * A * * Vf -t^- * -it * 

// Fields object 

function CreateFields(rsADO) 

^ if (typeof(rsADO) == 'object' && rsADO != null && rsADO. state != 0) 

return new _Fields(rsADO) ; 
return null ; 

} 

function _Fields(rsADO) 

^ if (typeofCbFSPrototypeCalled) == 'undefined') 
„FS prototypeC) ; 

this._rsFields = rsADO. Fields ; 
: — thjs._reset(rsADO) ; 

'} 

function _FS PrototypeC) 

.Fields. prototype. getName = _FS„getName; 
.Fields. prototype. getvalue = _FS.getValue; 
_Fi elds. prototype. setvalue = _FS„setvalue; 
_Fi elds. prototype. getcount = „FS_getcount; 

_Fi elds, prototype. _reset = _.FS reset; 

_bFSPrototypeCalled =1; 

//scope implementation to _FS Prototype function 

function „FS_getName(nlndex) 

^ if (typeof(nlndex) == 'number' && nindex >= 0 && nindex < 

this.getCountO) . ^ ^ ^ 

return this._rsFields(nindex) .name; 

return ' * ; 

} 

function _FS_getValue (field) 
var r = ' ' ; 

if (!this._newRecord && this._isvalid && 

(typeof (field) == 'number' || typeof (field) 'string')) 



{ 



types: 
adsingle 



if (this.„rsFi elds (field) .value != null) 

^ var fieldType = this. _rsFields(field) .type; 

//avoid 3Script formating for the following field 

//adDate, adOBDate, adOBTime, adDBTimeStamp, 
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if (CfieldType =-7) || (fieldType 133) li 
(fieldType == 134) || (fieldType == 135) I I (fieldType == 4)) 

r = 

Server. HTMLEncode(this._rsFields(field)) ; 

else 

r = this._rsFi elds (field) .value; 

} 

} 

return r; 

} 

f uncti on _FS_setVal ue (f i el d , val ue) 

^ if ((typeof (field) == 'number' || typeof (field) == 'string') && 

typeof (value) != 'undefined') 

{ // validate field as updatable 

if (this._isvalid) 
{ 

var nAttributes = 
Number(this._rsFields(field) .Attributes); 

if ((nAttributes & 4) | | (nAttributes & 8)) 
{ // field may be updated, adFldupdatable=4, 



adFl dUnknownUpdatabl e=8 
adFldlsNullable=32 



if (value == " && (nAttributes & 32)) 
{ // field is nullable, 

value = null ; 

this. .rsFields(field) .value = value; 
return true; 

} 



^ } 
return false; 

} 

function _FS_getCount() 

if (typeof (this. _rsFi elds) == 'object') 
return this. _rsFields. count; 
return 0; 

} 

function „FS reset (rsADO) 

^ this._isvalid = !(rsADO.BOF || rsADO.EOF); 

this._newRecord = false; 

} 

} // end of _FS Prototype function 

</SCRIPT> 
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// Microsoft Script Library<BR> 

// visual interDev 6.0 Recordset Object for dhtml<br> 

// copyright 1998 Microsoft Corporation, All Rights Reserved. <BR> 

// <B>Do not modify in design view. Switch to source view.</B><BR> 

// <SCRIPT> 

function createRecordset(strName,funclnit,obj Parent) 

^ if Ctypeof(strName) != 'string' || strName == ") 

return null ; 

var objRecordset = new _Recordset(strName) ; 
eval (strName + ' = objRecordset'); 

var strspan = '<' + 'SPAN id="' + strName + '_SPAN"></SPAN>' ; 
strspan = strSpan + '<' + 'SPAN id="' + strName + '_SPAN_AUX" datasrc=#' + 
StrName + '_RDS datafld=0 ></SPAN>'; 

if (CtypeofCobj Parent) 'object') && (obj Parent != null)) 
ob j Parent . i nsertAd j acentHTML( ' Bef oreEnd ' , strspan) ; 

else 

document. writeCstrSpan) ; 
obj Recordset. „spanTag = document .all [strName + '_SPAN']; 
// always fire init for recordset 

__EM fireEvent('_RS onbeforefuncini t(' + objRecordset -id + ) ); 

_EM fi reEvent(funclnit) ; 

....return objRecordset; 



function _Recordset(strName) 

^ if (typeof(_bRSPrototypeCalled) == 'undefined') 
_RS Prototype () ; 

// public members 
this. id = StrName; 
this. name = strName; 
this.absolutePosition = -1; 
this. fields = null ; 
this.BOF = true; 
this. EOF = true; 

// private members 

this._rsRDS = null ; 

this._rsADO = null ; 

this._spanTag = null; 

this._count = -1; 

this._bookmark = 0; 

this.„strConn = ' ' ; 

this,_strSQL = ' ' ; 

this._bDelete = false; 

this.^bDSChanged = false; 

this._bDSCompTete = false; 

this._bcance I Update = false; 

this.„bFiringOnBeforeUpdate = false; 

this._bFi ringOnRowEnter = false; 

// advise for default eventhandlers 
this._objEventManager = CreateEventManagerC) ; 

} 

Page 1 



RECORDSET.HTM 

function _RS Prototype () 

//public members 

.Recordset. prototype. getCount = _RS„getCount ; 
_Recordset. prototype. moveNext = _RS_moveNext ; 
_Recordset. prototype. movePrevious = _RS_movePrevious; 
_Recordset. prototype. moveFi rst = „RS_moveFi rst; 
^Recordset. prototype. moveLast = _RS_moveLast ; 
^Recordset. prototype. moveAbsolute = _RS_moveAbsolute; 
_Recordset. prototype. move = _RS_move; 
_Recordset. prototype. updateRecord = _RS_updateRecord; 
_Recordset.prototype. cancel Update = _RS_cancel Update; 
_Recordset- prototype. addRecord = _RS_addRecord; 
_Recordset. prototype. addlmmedi ate = _RS_addlmmediate; 
^Recordset. prototype. del eteRecord = „RS_deleteRecord; 
_Recordset. prototype. advise = _R5„advise; 
_Recordset. prototype. unadvise = _RS_unadvise; 

..Recordset .prototype. getRecordSource = _RS_getRecordSource; 
__Recordset. prototype. setRecordSource ^ _RS_setRecordSource; 
_Recordset. prototype. open = „RS_open; 
_Recordset. prototype. isopen = _RS_isOpen; 
_Recordset. prototype. close = _RS.close; 

_Recordset. prototype. getconnectst ring = _RS_getConnectString; 
_Recordset. prototype. getSQLText = _RS_getSQLText ; 
_Recordset. prototype. setSQLText = „RS_setSQLText ; 
_Recordset. prototype. requery = _RS_requery; 
_Recordset. prototype. setBookmark = _RS_set Bookmark; 

- -^Recordset .prototype. getBookmark = „RS_get Bookmark; 

Recordset. prototype. isDHTMLAware = __RS„isDHTMLAware; 
^Recordset . prototype . getDHTMLDataSou rcelD = _RS_getDHTMLDataSou rcelD ; 

//events 

RS_ONBEFOREOPEN = ' onbeforeopen ' ; 
RS„ONAFTEROPEN = ' onaf teropen ' ; 
RS„ONROWENTER = ' onrowenter ' ; 
RS_0NR0WEXIT = 'onrowexit'; 
RS_ONDATASETCHANGED = ' ondatasetchanged ; 
RS_ONDATASETCOMPLETE = ' ondatasetcompl ete ' ; 
RS_ONBEFOREUPDATE = ' onbeforeupdate ' ; 
RS„ONAFTERUPDATE = ' onaf terupdate ' ; 

//private members 

_Recordset. prototype. _connect = _RS — connect; 

__Recordset. prototype. _syncBOFandEOF = _RS syncBOFandEOF; 

_Recordset. prototype. „fireEvent = _RS — fireEvent; 
„Recordset. prototype. _isEmpty = _RS — isEmpty; 
_bRSPrototypeCalled = 1; 



function _RS syncBOFandEOF() 

if (this._rsRDS 1= null) 

^ if (this._bDelete) 

^ //If the recordset becomes empty by deleting, 

//RDS won't set bof and EOF. 
this.^bDelete = false; 

var ncount = this._rsRDS. recordset .RecordCount; 

if (ncount <= 0) 

{ 

Page 2 



RECORDSET.HTM 

this.BOF = true; 
this. EOF = true; 

} 

if Cthis.absolutePosition > nCount) 

this.absolutePosition = nCount; 

} 

else 

this.BOF = false; 

this. EOF = false; 

this.absolutePosition = 
this. __rsRDS. recordset. AbsolutePosition; , ^ 

if ((this.absolutePosition == -2) || (this.absolutePosition 
== -D) // adPosBOF or adPosUnk 

this.BOF = true; 
if ((this.absolutePosition -3) || (this.absolutePosition 
== -1)) // adPosEOF or adPosunk 

this. EOF = true; 

} 

} 

} 

function _RS_.getCount() 

if (this._count < 0) 

^ if (this.isOpenO && (Ithis.BOF || Ithis.EOF)) 

: - ^ this.^count = this. _rsRDS. recordset. RecordCount; 

if (this.__count <= 0) 

var curPos = this. „rsRDS. recordset .AbsolutePosition 
if (curPos > 0) 

this._count = 0; 

this. __rsRDS . recordset . MoveFi r st () ; 
whi 1 e ( ! thi s .^rsRDS . recordset . EOF) 
{ 

this.„count++; 

thi s._rsRDS. recordset. MoveNextO ; 
thi s._rsRDS. recordset. AbsolutePosition = 



curPos; 



} 



} 



} 

else 



return 0; 



} 



return this._count; 



') == 'true') 



function _RS_moveNext(bReverse) 

if (!this._isEmpty()) 

if ((bReverse + 

thi s . _rsRDS . recordset . MovePrevi ous () ; 
if (this.BOF) return false; 

} 

else 
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this,_rsRDS. recordset .MoveNextO ; 
if (this. EOF) return false; 

} 

return true; 

} 

return false; 

} 

function _RS„movePrevious() 

{ return this, moveNext(true) ; } 

function _RS_moveLastCbReverse) 

if (!this._isEmptyC)) 

if ((bReverse + ") == 'true') 

thi 5. _rsRDS. recordset. MoveFi rst() ; 

else 

t hi s.„rsRDS- recordset, MoveLastO ; 
return true; 
return false; 

} 

function _RS_moveFi rst () 

{ return this.moveLast(true) ; } 

function-._RS„moveAbsol ute(nlndex) 

^ if (typeof(nlndex) 'number' && !this._isEmptyO) 

this. _rsRDS. recordset .Absoluteposition = nindex; 
return true; 

} 

return false; 

} 

function _RS„move (nindex) 

{ // move relative to current record 

if Ctypeof (nindex) == 'number' && ! this._isEmpty()) 

thi s._rsRDS. recordset .Move(nlndex) ; 
return true; 

return false; 

} 

function _RS_updateRecord() 

^ if (this.isOpenO && !thi s.„bFi ringOnBeforeUpdate) 

this._bFiringOnBeforeUpdate = true; 

thi s . _ob j EventManager , f i r eEvent (rs„ONBEFOREUPDATE) ; 

this,_bFiringOnBeforeUpdate = false; 

if (! thi s._bcancel Update) 

thi s ..rsRDS . Submi tchanges () ; 

this._objEventManager.fi reEvent(RS„ONAFTERUPDATE) ; 
return true; 

} 
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this._bcancel update = false; 

} 

return false; 

} 

function _RS_cancelUpdate() 

if (this.isopenO) 

this._count = -1; 
this._bcancel Update = true; 
thi s ._rsRDS -CancelupdateO ; 
return true; 

return false; 

} 

function _RS„addRecord() 

^ if Cthis.isopenQ && ! this.^bFi ringOnBeforeupdate) 

if (this._count >= 0) 
4-+this._count; 
thi s._rsRDS. recordset. AddNewO ; 
return true; 

return false; 

} 

_f uhctTon ■ JlS_addlmmedi ate (f i el dLi st , f i el dval ues) 
^ Tf (this.isopenO && !this._bFi ringonBeforeupdate) 

if (this.^count >= 0) 

++this._count; r -. . 

this. _rsRDS. recordset. AddNew(fieldList, fieldvalues) ; 

thi s . updateRecordQ ; 
return true; 

} 

return false; 

} 

function _RS_deleteRecord() 

if (!this._isEmpty()) 

if (this._count >= 0) 
--this._count; 
this._bDelete = true; 
thi s - _rsRDS . reco rdset . Del ete Q ; 
thi s . updateRecord Q ; 
return true; 

return false; 

} 

function „RS_advi se(str Event , f uncToCal 1) 

^ if (this.isopenO && . . , ^^ , , 

((strEvent === RS.ONROWENTER && thi s ._bDSChanged) i I ^ , ^ 
(strEvent == RS_ONDATASETCHANGED && thi s ._bDSChanged) ll 
(str Event rs_ondatasetcomplete && this._bDSComplete))) 
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thi s . _f i reEvent (f uncToCal 1 ) ; 
return thi s ._obj EventManager .advi se(strEvent , f uncToCal 1 ) ; 

} 

function __RS_unadvise(strEvent ,nAdviselD) 

{ return this._.objEventManager.unadvise(strEvent,nAdviselD) ; } 

function _RS_getRecordSourceO 

^ if Cthis._rsRDS != null) 

return thi s._rsRDS. recordset ; 

return null ; 

} 

//function _RS„setRecordSource(rsADO) OR 
function _RS_setRecordSourceCstrconn,strSQL) 

^ if (typeof(strConn) == 'string') 

{ // given a connect and SQL string 

this._strConn = unescapeCstrConn) ; 
return this.setSQLText(strSQL) ; 

} 

if (typeof (strconn) = 'object') 
{ // given an ADO object 

this._strConn = ' ' ; 

this._strSQL = " ; 

' * if (this._rsRDS != null) 

^ this._rsRDS.SourceRecordset = strConn; 

else 

this._rsADO = strconn; 
this.openC) ; 

} 

return true; 
return false; 

} 

function _RS_openO 

^ this._objEventManager.fi reEvent (RS.ONBEFOREOPEN) ; 

this._connect() ; 
if (this._rsADO != null) 

this.„rsRDS.SourceRecordset = this.„rsADO; 
this._objEventManager.fi reEvent (RS_ONAFTEROPEN) ; 

} 

function _RS_isOpenO 

if (this._rsRDS U null) 

^ if C(this._rsRDS.ReadyState ==2) M (this._rsRDS.ReadyState 

return true; 

return false; 

} 

function _RS_closeO 
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^ this._rsRDS = null ; 

this.„count = -1; 

} 

function _RS_getConnectStringO 

^ return this._strConn; 

} 

function _RS_getSQLTextO 

if (this.„rsRDS != null) 

return this,_rsRDS.SQL; 

else 

return thi s ._strSQL; 

} 

function _RS_setSQLText(strSQL) 

^ if CtypeofCstrSQL) =- 'string') 

^ this.„strSQL = strSQL; 

if (this._rsRDS != null) 

this._rsRDS.SQL = strSQL; 
return true; 

return false; 

} 

function^TRS^requeryO 

if (this.isOpenQ) 

this._rsRDS.RefreshC) ; 
this.„count = -1; 

} 

} 

f uncti on _RS_setBookmark(bookmark) 

^ this._bookmark = bookmark; 

if (this.isOpenQ && this. .bookmark > 0) 

^ if (thi s.„rsRDS. recordset. Supports(8192)) 

{ // supports bookmarks . . . , , 

thi s.„rsRDS. recordset. Bookmark = this-_bookmarK; 

} 

else 

{ // use AbsolutePosition _ , . ^ i ■ * 

thi s._rsRDS. recordset. AbsolutePosition = this.^bookmark * 



1; 



} 



} 

return true; 

} 

return false; 



function _RS_getBookmark() 
if (this.isOpenO) 

^ if (this. „rsRDS. recordset. Supports(8192)) 
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{ // supports bookmarks 

return this._rsRDS. recordset . Bookmark; 

} 

else 

{ // use AbsolutePosition 

retu rn thi s ._rsRDS . recordset . Absol utePosi ti on ; 

^ } 

return this._bookmark; 

} 

function _RS_i sDHTMLAwareC) 
{ return true; } 

function _RS_getDH™LDataSourceiD() 

^ if (this._rsRDS != null) 

return (this. name + '„RDS'); 
return ' ' ; 

} 

function _RS connect () 

^ var strserver = 'http://' + document -domain; 

var strRDS = ' ' ; 

StrRDS = StrRDS + + '0B3ECT 

classid-clsid:BD96C556-65A3-llD0-983A-00C04FC29E33 height=l style= LEFT: Opx; TOP: 

Opx" width=l' ; . , v , 

StrRDS = StrRDS + ' id=' + this -name + '_RDS>\n ; ,„ x , 

StrRDS = StrRDS + '<PARAM NAME="Server" VALUE="' + Strserver + >\n ; 
- ' if (this._strConn != ") 

— StrRDS = StrRDS + '<PARAM NAME= Connect value= + 

encodeHTMLQuotes(this._strConn) + '">\n'; 

if (this._str5QL != ") „ 

StrRDS = StrRDS + '<PARAM NAME= SQL' VALUE= + 
encodeHTMLQuotesCthis.„strSQL) + "'>\n'; 

StrRDS = StrRDS + '</OBJECT>'; 

this._spanTag.innerHTML = strRDS; 

this._rsRDS = document. all [this. name + '_RDS']; 

this. fields ^ createPi elds (thi s. _rsRDS) ; 

this._rsRDS.onrowenter = _RS onrowenter; 

this._rsRDS.onrowexit = _RS onrowexit; 

this._rsRDS.ondatasetcomplete = _RS ondatasetcomplete; 

this._rsRDS.ondatasetchanged = _RS ondataset changed; 

this.„bDSChanqed = false; 

thi5.„bDSCompTete = false; 

this._count = -1; 

return true; 

} 

f uncti on „RS f i reEvent(f uncToFi re , buseEvent) 

^ if ((typeof (buseEvent) 'boolean') && (buseEvent)) 

var strRS = event. srcElement . id; 

strRS = strRS. substring(0, StrRS. length-4); // strip _RDS to get 



name 



var _objRS = eval(strR5); 

if (typeof (_objRS) == 'object') 

^ if (funcToFire == RS„ONDATASETCOMPLETE) 

{ 
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_objRS.„bDSComplete = true; 

If (funcToFire == rs_ondatasetchanged) 

^ _obiRS..syncBOFandEOFC) ; 

_objRS.fi elds = CreateFields(_ob]RS.„rsRDS) ; 
_objRS.„bDSChanged = true; 

If (funcToFire rs_onrowenter) 

^ if (_objRS._bFiringOnRowEnter) 

return; 

_objRS._bFiringOnRowEnter = true; 
_obi RS . „syncBOFandEOF () ; 

_objRS.fi elds = createFields(_ob]RS._rsRDS) ; 
_objRS._bFi ringOnRowEnter = false; 

If (_objRS._objEventManager != null) , 

_objRS._objEventManager.fi reEventCfuncToFi rej ; 

} 

} 

else . . . ^ 1 

{ // fire recordset imtFunc immediately 

if (typeof (f uncToFi re) == 'string') 

eval (f uncToFi re) ; ^ . 

else if (typeof (funcToFi re) == 'function ) 
funcToFireO; 

} 

function"^RS ondatasetcompleteQ 

{ _RS_fi reEvent(RS_ONDATASETCOMPLETE,true) ; } 
function _RS ondatasetchangedQ 

{ _RS_fi reEvent(RS_ONDATASETCHANGED,true) ; } 
function _RS onrowenterC) 

{ _RS_fi reEvent(RS_ONROWENTER,true) ; } 
function _RS onrowexitQ 

{ _RS_f i reEvent (RS_0NR0WEXIT, true) ; } 

?""'°%i?um'oS^^lopenO 1 1 (this.BOF 8& this.EOF)) } 

f uncti on _RS onbef oref unci ni t (ob j Recordset) 

{ 

obj Recordset . „obj EventManager . advi seDef aul tHandl er(obj Recordset .id, RS_ONBEFOREOPEN , 
true) ; 

obj Recordset ._obj EventManager . advi seDef aul tHandl er (ob j Recordset .id, RS_ONROWENTER , 
true) ; 

objRecordset._obj EventManager. advi seDefaultHandler(objRecordset. id, RS_0NR0WEXIT, 
true) ; 

obj Recordset . _ob j EventManager . advi seDef aul tHandl er (ob j Recordset .id, rs_ondatasetchang 
ED, true); 

obj Recordset .„obj EventManager . advi seDef aul tHandl er (ob j Recordset .id, rs_ONDATASETCOMPL 
ETE, true); 
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objRecordset .„obj EventManager . advi seDef aul tHandl erCobjRecordset .id, rs_onbeforeupdate 
, true); 

ob j Recordset . „ob j EventManager , advi seDef aul tHandl er (ob j Recordset .id, rs_onafterupdate , 

true) ; 

} 

function createFields(rsRDS) 

^ if (typeofCrsRDS) == 'object' && rsRDS != null) 

return new _Fielas(rsRDS) ; 
return null ; 

} 

function _Fields(rsTag) 

_Fi el ds_PrototypeO ; 
this.rsTag = rsTag; 

} 

function „Fields_PrototypeO 

^ „Fi elds. prototype. getName = „FS„getName; 

_Fi elds. prototype. getvalue = „F5„getval ue ; 
^Fields, prototype, setvalue = _FS_setvalue; 
\^*elds.prototype.getcount = _FS_getCount; 
_Fi elds. prototype -_isval id = „FS isvalid; 

} 

function _FS_getName(nindex) 

^ if Ctypeof(nlndex) 'number' && nindex >= 0 && nindex < this.getCountQ) 

^ fsTmp = this.rsTag. recordset. Fields; 

return fsTmp (nindex) .name; 

return ' ' ; 

} 

function _FS_getvalue (field) 
{ 

var r — ■ • • 

if (this.JsvalidO && (typeof (field) -= 'number' || typeof (field) = 
'string')) 

fsTmp = this.rsTag. recordset. Fields; 
r = fsTmp (field) .value; 
if (r == null) 



r = 



} 

return r; 

} 

f uncti on _FS_setval ue (f i el d , val ue) 

^ if ((typeof (field) == "number" |1 typeof (fi el d) == "string") && 

typeof (value) != "undefined") 

{ // validate field as updatable 
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if (this._isvalid) 

fsTmp = this. rsTag. recordset. Fields; 
var nAttributes = Number(fsTmpCfi eld) .Attributes) ; 
if ((nAttributes & 4) | | (nAttributes & 8)) 



adFl dunknownupdatabl e=8 



// field may be updated, adFldUpdatable=4, _ . 

if (value == " && (nAttributes & 32)) 
{ // field is null able, adFldlsNullable=32 

value = null ; 

fsTmp (field) .value = value; 
return true; 



} 



} 



} 



return false; 



function _FS_getCount() 

^ fsTmp = this. rsTag. recordset. Fields; 

if (typeof(fsTmp) == 'object') 

return fsTmp. count; 
return 0; 

} 

function _FS isValidO 

{ return ! (this. rsTag. recordset .BOF 



this. rsTag. recordset. EOF) ; } 
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<SCRIPT RUNAT=SERVER Language=" JavaScri pt"> 

^ ^ A J- ^ jr- ^. ^ ^. j;. J-- * * Vc * * ^ * * " ' * " " " " " " 

// MSL : Microsoft Scripting Libary 

// Remote Scripting utilities for server. 

// The Remote Scripting utilities for the server primarily 
// consists of the RSDispatch routine. This is the function 

// placed at the top of the ASP page which handles dispatching 

// to a valid public_description function and marshal Is the 
// return value back to the client. 

// Copyright 1998 Microsoft Corporation. All Rights Reserved. 

I y***£4****^-****Vf^-:it******A***Vf ********** Vf^f**Vf^-** 

// function RSDispatchC) 

// This function is used to dispatch to the proper server 

// function in the public_description object based on the 

// Request. QueryStringC"_method") parameter passed in. 

********************************* 

f uncti on RSDi spatch (vt abl e , methodname) 

^ if (typeof (methodname) != 'string') 

^ var methodtype = Request.QueryStringC'_mtype') + 

if (methodtype != 'execute') 

return false; 
methodname = Request .QuerySt ring ('_method') + ; 
if (methodname == " 1 1 methodname == 'undefined') 
:^ ^ return false; 

r 

var dispatchVTbl = null; 

if (typeof (vtable) 'object') 

dispatchVTbl = vtable; 
else if (typeof(public_description) == 'object ) 

dispatchVTbl = public^description; 
if (dispatchVTbl — null) 

return false; 

var strResponse = '<METHOD VERSION="1.0.8044">' 
if (methodname 'GetServerProxy') 

^ StrResponse += Return(GetServerProxy(dispatchVTbl)) ; 



} 

else 
{ 



')' 



if (typeof(dispatchVTbl [methodname]) == 'function') 
{ // validate function is in dispatchVTbl 

var params = ' ' ; 

var pcount = Request. QueryStringCpcount ); 

for (var i=0; i < pcount; i++) 

{ // extract parameter values 

params += 'Request .QueryStringC'p' + i + '").item ; 

if (i < pcount-1) 

params += ' , ' ; 

} 

var dispatch = 'dispatchVTbl.' + methodname + '(' + params + 

//Response. write(di spatch); // USED FOR DEBUG 
// validated against dispatchVTbl, safe to eval on the 
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server 



} 

else 
{ 



} 



var r = eval (dispatch) ; 
strResponse += ReturnCr); 



var strError = '<return_value type=error>" ; 

strError += escape (met hodname + ' : not a public function'); 

StrError += '</RETURN„VALUE> ' ; 

StrResponse += strError; 



StrResponse += '</METHOD>'; 

Response. write(strResponse) ; 
return true; 

} 

// function Return(x) ^ .... ■ un 

// This function is used to translate the data in given variable x, 

// into a string for transport to the client, if the variable 

// is an object, then the type is set to EVAL_0B3ECT to indicate 

// to the client that this is an object being marshalled and it 

// should be "evaluated". 

yy***^-*****^-*A*****A*****Vf**-^^******Vf^f ****** 

function Return (x) 

var returnType = typeof (x) ; . . , 
..of (returnType == 'object' M returnType == 'number' M returnType == 

"'boolean'J)" , . i r w 

return ' <return_value type=eval„object>' + escape(uneval (x)) + 

' </return„value> ' ; 
el se 

return '<RETURN_VALUE type=simple>' + escapeCx) + '</return_value>' ; 

} 

^ y^-Vf****************************** " 

// function GetServerProxy(pd) , . ^ - ■ 

// This function returns a server proxy given a public_description. 

^ ^ ^ 0., ^ ^ J!- ^- ^ ^ ^ ^ ^ ^- ^- ^- ^ 

function GetServerProxy(pd) 

if (luneval initialized) 

inituneval () ; 

uneval initialized = true; 

} 

var 0 = new Object; 
for (var name in pd) 

^ if (typeof (pd [name]) == 'function' && pd._isPublicMember(name)) 

^ o[name] = Functi on (' return 0;'); 

} 

} 

return o; 

} 

^ yV^A^V-^-Ju^f^-Vt *********************************** 
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// function uneval(obj) , .... . 

// This function takes a given 3scnpt object and creates a 

// string representing the object instance in its current state, 

// such that when the string is "evaluated" with the "eval" 

// function, the object will be recreated. This function is used 

// to to "marshal!" jscript objects across the client/server 

// boundary. 

var uneval Initialized; 
var uneval Nextldentifier; 
function uneval GetNextlDQ 

return '_o' + uneval Next ID++; 

} 

function uneval (obj) 

^ if (! uneval initialized) 

inituneval () ; 
uneval Initialized = true; 

uneval NextiD = 0; 
var s = War undefined;' 
unevalclearCobj) ; 
return s; 

} 

function. uneval Decl (obj) 

var s = ; 
switch (typeof (obj)) 

case 'undefined' 
case 'boolean' : 
case 'number' : 
case 'string' : 
break; 



uneval Dec! (obj) + uneval Inst (obj) ; 



typeof (obj 



default: 
_decl)) 



'if (null != obj && !obj._mark && 'string' 

obj mark = true; 

obj decl = unevalGetNextlDO ; 

s = obj. uneval Decl () ; 

delete obj — mark; 
} 

break; 



1 = 



} 



return s; 



function uneval inst(obj) 

var s = ; 

switch (typeof (obj)) 

case 'undefined': 

s = 'undefined' ; 
break; 

case 'boolean' : 
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case 'number': 

s = String(obj); 

break; 
case 'string' : 

s = unevalStringCob]) ; 

break; 

default: 

if (null == obj) 

s = 'nulV; 

else if (obj._mark) , 
s = '"error: cycle in uneval graph. 

else 

obj . mark = true; 

s = obj. uneval Inst 0 ; 

delete obj. mark; 

} 

break; 

} 

return s; 

} 

function uneval Clear (obj) 

^ switch (typeof (obj)) 

case 'undefined': 
case 'boolean': 
- : ^ case 'number': 
case 'string' ; 

break; 

default. (null != obj && !obj mark && 'string' = 

typeof (obj . decl)) ^ 

obj . mark = true; 

obi . uneval clear () ; 

delete obj. mark; 

} 

break; 

} 

return ; 

} 

function uneval DoNothingO 
{ } 

function uneval ConvertToString(obj) 

{ return String(obj); } 

function unevalstring(str) ^/^taw-im/ . \ 

{ return + str . replace (/([A\\]) Vg, $1\\ ) + » > 

// function initUnevalO 

// This function sets up the prototype _uneval functions that 

// are used to support uneval function for all data types. 
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function initUnevalO 

// instnnsic objects 

object. unevalDecl ~ unevalDoNothing; 

Object. unevalinst = function Q { return 'object'; } 

object. uneval Clear = unevalDoNothing; 

Boolean. unevalDecl = unevalDoNothing; 

Boolean. unevalinst = function () { return 'Boolean'; } 

Boolean. uneval Clear = unevalDoNothing; 

Number. unevalDecl = unevalDoNothing; 

Number. _uneval Inst = function () { return 'Number'; } 
Number. unevalclear = unevalDoNothing; 

String. unevalDecl = unevalDoNothing; 

string. unevalinst = function () { return 'string'; } 

String. unevalclear = unevalDoNothing; 

Date. unevalDecl = unevalDoNothing; 

Date. unevalinst = function Q { return 'Date'; } 

Date. unevalclear = unevalDoNothing; 

Function. unevalDecl = unevalDoNothing; 

Function unevalinst = function Q { return 'Function'; } 

Function. unevalclear = unevalDoNothing; 

Array. unevalDecl = unevalDoNothing; 

Array. unevalinst = function Q {return 'Array'; } 

- ^ . ..'-Array unevalclear = unevalDoNothing; 

77 object members 

object. prototype. enumMembers = function(retval ,func) 

^ var isPublicMember = this. isPublicMember; 

if ('object' == typeofCthis. uneval Properties)) 

^ var uneval properties = this. uneval Properties; 

var length = uneval Properties. length; 
for (var i = 0; i < length; i++) 

i f (i sPubl i cMember (uneval Properti es [i ] ) ) 

func(retval, this, uneval Properti es[i]) 

} 

} 

else 

for (var i in this) 

if (isPublicMember(i)) 

func(retval, this, i); 

} 

} 

} 

object. prototype. unevalDecl Member = function (retval , obj, member) 

^ retval .otherDecl unevalDecl (obj [member]) ; ^ _ _ 

retval. myDecl += obj._decl + '[' + uneval String(member) + '] = 
uneval Inst (obj [member]) + ' ; ' ; 

object, prototype. unevalDecl = functionO 
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var retval = { otherDecl : * ' , myDecl : ' ' } ; 

this. enumMembers (retval , this. uneval Dec! Member) ; 

return retval .otherDecl + 'var ' + this. decl + + 

this. unevalConstructorO + + retval .myDecl ; 

} 

Object .prototype. unevallnst = function () 

{ return this. decl; } 

Object. prototype. unevalClearMember = function(retval , obj , member) 

{ uneva I clear (obj [member]) ; } 

Object. prototype. unevalclear = functionC) 

delete this. decl ; 

this. enumMembers (null , this. unevalClearMember) ; 

} 

Object. prototype. isPublicMember = function (member) 

{ return ' ' != member. substr(0, 2) ; } 

Object. prototype. uneval Constructor = function () 

{ return 'new Object'; } 

// overrides for simple types 

Boolean, prototype. uneval Constructor = functionO 

{ return 'new BooleanC + string(this) + ')'; } 

Number .prototype. unevalconstructor = functionO 

{ return "new NumberC + string(this) + ')'; } 

String, prototype. unevalconstructor = functionO 

ir return 'new StringC + uneval String(this) + ')'; } 

Date, prototype. unevalconstructor = functionO 

{ return 'new Date(Date.parse(" ' + string(this) + '"))'; } 

// overrides for function 

Function, prototype. unevalDecl = functionO 

{ return string(this) . replace(/function ([a\(]")/, 'function 

this. decl); } 

// overrides for array 

Array, prototype. unevalDecl = functionO 

var decl = this. decl; 

var p = < ' . 

var s = 'var ' + decl + '= new Array (' + this. length + ');' 

var length = this. length; 

for (var i = 0; i < length; i++) 

r += unevalDecl (thi sCi]) ; 

s += decl + '[' + i + '] = ' + unevallnst(this[i]) + ' 

} 

return r + s; 

} 

} // end of inituneval 

</SCRlPT> 
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1 1 ^.j.jfjfjfjf^^j.^j.j.j.jfjf'^-^itififitit ic it ^ ^ww. ju jf ^. if J- if it ic i: it it it * * * it it it it it it it i: it it it it it it it it it it it it it it it it g 

// Microsoft Script Library<BR> 

// visual interDev 6.0 Remote Scripting utilities for client<BR> 
// copyright 1998 Microsoft Corporation. All Rights Reserved. <BR> 
// <B>Do not modify in design view. Switch to source view.</B><BR> 

it it it it it it it it it it it it it it it'i' it it it it* it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it it 
// <SCRIPT> 

^ ^^^^ifififitiriiitititititiritititicitititititititititititititititititititiiitititititit^^ 

// The Remote Scripting utilities for the client consist of 
//three public methods and the RSCallObject definition. 
// The public methods are RSEnableRemoteScripting, RSExecute 
// and RSGetASPObject. The RSCallObject is returned from any 
// remote scripting call and provides status and return value. 

if it it it ic it it it it it ie it* it it it tii it it it it it it it it it it it it it it it it it it it it it it it it it* 
I ^ififititit*it**it**it*********i:ific*iiit*itit***i.'***i(i:iiic**i:iiitic*******i:ificiiicic^^ 

// function RSEnableRemoteScriptingC) 

// This function enables the remote scripting proxy. 

f uncti on RSEnabl eRemoteScri pti ng (codebase) 

^ MSRS = new „MSRS_object() ; 

if (typeof (codebase) == 'undefined') u u ^ 

{ // assume applet is in „ScriptLibrary directory off the webroot 

var secondslash, path; 

if ((secondslash = (path := window.location, pathname) .indexOfC/' ,1)) 

1= -1) 

codebase = path.substring(0, secondslash) ; 
- ■ - codebase += '/^ScriptLibrary' ; 

document. write('<' + 'APPLET name=RSAspProxyApplet codebase=' + codebase + 
code=RSProxy. class height==0 width=:0></APPLET>') ; 
} 

y ^i.ifititic*************it**********itifii*i:i'itiii*'-^**-^-''^'-^<'^-^-*-^^ 

// function RSExecute(url , method, pi ... pn,cb, ecb, context) 

// This is the function by which remote scripting calls are made. 

// The caller provides the following : 

// url : url to the asp file containing remote script 

// method : name of the method to be invoked 

// pl.,.pn : any parameters required by the method 

// cb : an optional callback routine for async. 

// ecb : an optional error callback routine for async. 

// context : an optional user context .^^.^..^ 

y^ififititifititit***itit***i(***it****i:ieiiiti<iiiti(itii*ic****i(it*i:*ititiiifi!ifit*i^* 

function RSExecute(url , method) 

var cb, ecb, context; 
var params = new Array; 
var pn = 0; 

var Ten = RSExecute. arguments. length; 
for (var i=2; i < len; i4-+) 

params [pn++] = RSExecute. arguments [i J ; 

return MSRS. invokeMethod (url , method, params) ; 

} 

^ ^ifififi.itifit*if********ic**********ic*******icic*is'*itit**iti:*****i.'***i^'*it**iT**i: 

II function RSGetASPObject (url) 

// This function returns a server object for an ASP fi le 

// described by its public_description. 
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I y J. J. * * Vf * * A -iV * V? * A *^ * * "^f * "A * A « " * *V V; "^r :?f * 'k 

function RSGetASPObjectCurl) 

var cb, ecb, context; 
var params = new Array; 

var request = MSRS. startRequest Curl , 'GetServerProxy' , params, cb,ecb, context) ; 
if (request. status == msrs_completed) 

var server = request . return„value; 
if (typeof (Function) 'function') 

for (var name in server) 

server[name] = FunctionC return 
MSRS.invokeMethod(this.1ocation,"' + name + '",this.' + name + '.arguments);'); 

} 

else . ^ o ^ 

{ // JavaScript 1.0 does not support Function ( IE3.0 ) 

for (var name in server) 

server [name] = eval ('function 
t(p0,pl,p2,p3,p4,p5,p6,p7,p8,p9,pA,pB,pC,pD,pE,pF) {return 

MSRS.nnvokeMethod(this.location,"' + name + '",this.' + name + '.arguments);} t ); 
} 

server .location = url; 
return server; 

alert('Failed to create ASP object for : ' + url); 
return null ; 

} 

Of ^ A Aff*** 

// f uhcfi an RSCal 1 Ob j ect (cb , ecb , context) 

// The RSCallObject is returned for every remote scripting 

// invocation. It contains the return value and status. 

// -jd : unique id of request 

// status : status of request, one of 

// |V|SRS_COMPLETED 

// MSRS_FAIL 

// MSRS_PENDING 

// MSRS_PARTIAL 

// message : message associated with status 

// data : raw data returned from server 

// return_value : evaluated value returned from server 

// callback : user provided callback ( optional ) 

// error„callback : user provided callback ( optional ) 

// context : user provided context ( optional ) 

f uncti on RSCal 1 Ob j ect (cb , ecb , context) 

this. id = MSRS-nextRequestID++; 

this. status = MSRS_PENDING; 

this. message = " ; 

this. data = " ; 

this. return_value = ''; 

this. call back = cb; 
this.error_callback = ecb; 
this. context = context; 

this. wait = RSCal 1 Ob ject_wait; 
this. cancel = RSCal 1 Ob j ect_cancel ; 
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MSRS.requestList[this.id] = this; 

} 

// function RSCanobject„wai t() 

// The RSCanobject_wait method can be called from an asynchronous 

// request to wait for it to complete, if the request has finished 
// this call returns immediately. 

// this = RSCall object instance to wait for 

function RSCallObject_wai tQ 

^ if (this. status != MSRS_PENDING) 

return; 
while (true) 

{ // wait synchronously for response 

i f (MSRS . rsappl et . wai t ForResponseQ) 

^ if (MSRS. rsappl et.hasResponseO) 

^ var rid = MSRS. rsappl et.getRequestiD() ; 

MSRS . handl eResponse (ri d) ; 

// DO NOT CHANGE THIS CODE 

// Solves 3ava to Script discrepancies between IE3 



and Navigator 



response completed 



var strrid = String(rid); 
if (strrid == null) 

strrid ^ rid; 
if (strrid == this. id) 

break; 



} 

else 
{ 



this. status = MSRS_FAIL; 

this, message = 'Request not handled. 

break; 



// this 



} 

} 

I ^^^-^a,^^^-^-*^Vf**************************************************^ 
// function RSCallObject_cancel () 

// The RSCall Ob ject_cancel method can be called from an 

// asynchronous request to cancel it. if the request has 

// finished this call returns immediately. 

// this = RSCallObject instance to cancel 

yy^^,^^^-Vt^^-^-^^^Vf*^yr***yf*Vt******A*****************************"*" 

f uncti on RSCal 1 Ob j ect„cancel () 

^ if (this. status msrs.pending) 

^ MSRS . rsappl et . cancel Request (thi s . i d) ; 

this. status = MSRS„FAIL; 
this. message = 'Request cancelled. 

} 

} 
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PRIVATE IMPLEMENTATION BELOW — — .... 

//*** PRIVATE IMPLEMENTATION BELOW ****-••"*"*-•• "IZ.^^^^^ 

//**^- PRIVATE IMPLEMENTATION BELOW * -it-^st ^ ^t. 

// Remote Scripting object — private implementation 

// The following code is private glue code that contains the 

// implementation of a DSObject to enable remote scripting 

// functionality on the client. This private object is utilized 

// by the public Remote scripting methods defined above. 

^y^^^^^^*i-^**^-ft**Vf*Vt**yf ******************* AVf^rVf* 

// function _MSRS_Object 

// This is the DSObject that interacts with the RSAspProxy 
// applet to synchronously/asynchronously retrieve data via 

^^^,^.-^,,^4***fLnifi*************** 

//var MSRS = new _MSRS_object() ; 

function _MSRS_objectO 

{ 

MSRS_FAIL = -1; 
MSRS_COMPLETED = 0; 
MSRS_PENDING = 1; 
„_,^MSRS_PARTIAL = 2; 

this.REQUEST_MODE_COMPLETE = 0; 
this.POLLING_PERIOD = 100; 

this.polllD = 0; 
this. poll Count = 0; 
this.nextRequestiD = 1; 
this.requestList = new Array; 
this.rsapplet = null ; 

this.startRequest = _MSRS_startRequest ; 
this.invokeMethod = _MSRS_invokeMethod; 
this. hand! eResponse = _MSRS_handleResponse; 
this.evaluateRequest = jviSRS^evaluateRequest ; 
this.setRequestPoll = „MSRS„setRequestPoll ; 
this. requestPoll Handler - „MSRS„requestPoll Handler; 
this.buildURL = _MSRS_buildURL; 

} 

//****************************************""**"********** 

// function _MSRS_startRequest(url , method, args,cb,ecb, context) 

// This is key function for initiating a request for data. 

// The url to the ASP file is required. The callback, 

// error callback, and user context parameters are optional. 

^^^^^*,,^^J,L"L7****^ 

function _MSRS_startRequest(url , method, args,cb,ecb, context) 

^ var request = new RSCallobject(cb, ecb, context) ; 

if (this.rsapplet null) 

^ if (typeof (document. RSAspProxyApplet) == 'object") 

this.rsapplet = document .RSAspProxyApplet; 
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else if (typeof (document. thisForm) == 'object' && 
typeofCdocument.thisForm.RSAspProxyApplet) == 'object') 

this. rsapplet = document. thisForm.RSAspProxyApp let; 

else 

^ errmsg = ' ERROR :\nCannot locate proxy which supports Remote 

Scripting.\nwas RSEnableRemoteScripting method invoked?'; 

request. status = msrs„fail; 
request. message = errmsg; 
alert(errmsg) ; 

} 

} 

if (request. status != MSRS„FAIL) 

^ url = this. buildURL(url , method, args) ; 

url_context = window. location. href; // May not be 
' wi ndow . 1 ocati on . pathname ' 

thi s . rsappl et , startRequest (request . i d , url„context , url , thi s . REQUEST_MODE_COMPLETE) ; 
if (typeof (cb) == 'function') 

^ if (this.pollCount++ == 0) 

thi s . setRequestPol 1 () ; 

} 

else 

{ // wait synchronously for response 

request .waitO ; 

} 

J 

return request; 

} 

// function _MSRS_invokeMethod(url , method, args) 

// This is the function by which remote scripting calls are 

// via a server object retrieved with the GetASP0b3ect call. 

// The caller provides the following : 

// url : url to the asp 

// method : name of the method to be invoked 

// arqs : an array containing method parameters 

// and the optional cb, ecb, context parameters 

y^^,^^,^^^..-^^***^.:;tifr********Vf ********* 

function _MSRS_invokeMethod(url , method, args) 

var cb, ecb, context; 
var params = new Array; 
var pn = 0; 
var i = 0; 

for (var i=0; i < args. length; i++) 

^ if (typeof(args[i]) 'function') 

^ pn = -1; // no more params 

if (typeof (cb) == 'undefined') 
cb = args[i] ; 

else 

ecb = args[i]; 
else if (pn != -1) 

params [pn++] = args[i]; 
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else 

context = args[i] ; 

} 

return MSRS.startRequest(url , method, params,cb,ecb, context) ; 

} 

I y j:. jf ^ j;- ****** ******** 

// function _MSRS„hand1eResponseCrequestid) 

// This function will handle the response for a given request. 
// If the response is complete or failed, then the associated 
// request object will be updated and the appropriate callback 

// invoked, if provided. 

// note: incremental data retrieval is not yet supported ^^^^^ 

^y^^.^a.y.^^y.Vf**^*************************************** " 

f uncti on „MSRS_handl eResponse (requesti d) 

^ var request = this. requestList [requesti d] ; 

if (typeof (request) 'undefined') 

alert ('Unknown request id.'); 
return; 

} 

request, status = this, rsapplet .getStatusO ; 
if (request. status == MSRS_COMPLETED) 

^ request. data = this, rsapplet .getDataO ; 

request. message = this, rsapplet. getMessageO ; 
' ' " - this.evaluateRequest (request) ; 

— if (request. status == msrs_fail) 

^ if (typeof (request. error.call back) == 'function') 

this. poll Count--; 

request . er ror_cal 1 back(request) ; 

} 

else , , ^ 

alert('Remote Scripting Error\n' + request .message) 

} 

else 

^ if (typeof (request. call back) 'function') 

this.pollcount--; 

request . cal 1 back(request) ; 

} 

thi s . rsappl et . endResponseO ; 
this.requestList[request.id] = null; 

} 

else if (request. status MSRS_FAIL) 

^ request. message = this, rsapplet. getMessageO ; 

if (typeof (request .error_call back) == 'function ) 

this.pollcount--; 

request . error_cal 1 back(request) ; 

this, rsapplet. endResponseO ; 
this.requestList[request.id] = null; 

} 
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else if (request. status == MSRS_PARTIAL) 

{ // not handling partial data retrieval yet 

else'^if (request. status MSRS_PENDING) 
{ // do nothing 

} 



// function _MSRS_evaluateRequest (request) 

// This function evaluates the data returned to the request. 

// Marshalled jscript objects are re-evaluated on the client^ 

function _MSRS„evaluateRequest (request) 

^ var data = request .data; 

var start_index = 0; 
var end_index =0; 

var start_key = + 'RETURN_value' ; 
var end_key = + VRETURN_VALUE> ' ; 

if ((start_index = data.indexof (start_key)) != -1) 

^ var data_start_index = data.indexof (*>' ,start„index) + 1; 

end_index - data.indexof (end_key, data_start_i ndex) ; 
if (end_index == -1) 

end_index = data. length; ... • ^ > 

var metatag - data.substring(start„Tndex,data„start_index) ; 
if (metatag. indexOfCTYPE=SiMPLE') != -1) 

— request. return_value = 

unescape (data . subst ri ng (data„s tart_i ndex , end__i ndex) ) ; 

else if (metatag. indexOf('TYPE-EVAL_OB J ect') !- -1) 
{ 

request. return^value = 
data . subst ri ng Cdata_start_i ndex . en^^^^^^ 

else if Cmetatag.indexOf('TYPE=ERROR') != -1) 

^ request. status = MSRS_FAIL; 

request. message = 
unescape (data. substring(data_start_i ndex , end_i ndex)) ; 

} 

else 

^ request. status = MSRS_FAIL; • i „ j n^i- 

reguest. message = 'REMOTE SCRIPTING ERROR: Page invoked does not 

support remote scripting.'; 
} 

} 

//***************************************************************** 
// function _MSRS_setRequestPoll () 

// Due to limitations in calling back into jscript from a worker 
// thread of an applet, a polling mechanism is used to determine 
// when a request has been completed. This function sets up 
// a timer to kick the reauestPoll Handler at a later time. 
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function _MSRS_setRequestPon Q 
{ 

this.pollID = , . . ,^ 

wi ndow . setTi meout ( ' MSRS . requestPol 1 Handl er() ' , thi s . P0LLING_PERI0D , j avascn pt ) ; 

} 

// function _MSRS_requestPon Handl er() 

// Due to limitations in calling back into 3Script from a worker 

// thread of an applet, a polling mechanism is used to determine 

// when a request has been completed. This function is the 

// handler which is kicked by a timer. It polls the applet to 

// see if a response to a prior request is available. 

yyj-^ju^.jfj^Jt*****Vf***Vf ******* ******** 

f uncti on _MSRS_requestPol 1 Handl er Q 

while (this. rsapplet.hasResponseO) 

^ thi s . handl eResponse(thi s . rsappl et . getRequestlDO) ; 

if (this. poll count != 0) 
thi s . setRequestPol 1 () ; 

} 

^ ^^.Jt ************************************************ 
// function _MSRS_escapePl us (value) 

// This replaces all occurances of ' + ' with "%2b' in the supplied 

^^^vfl^^X***************************************"***"**^^ 

function— _MSRS escapePl us (value) 

^ for (var i = 0, newvalue = i < value. length; i++) 

newvalue += (value. charAt(i) '%2B' : value. charAt(i)) ; 

return newvalue; 

} 

^ ^^.yu^^vt************************************************ 
// function _MSRS_buildURL(url , method, args) 

// This builds the proper url entry point into the ASP page 
// such that the intended server method with parameters gets 

// invoked. 

^y^^^^^^^^^Vf************************************************ 
function _MSRS_buildURL(url .method, args) 

^ if (url == '') url = window. location. pathname; 

if (typeof (method) == 'string') 

url += '?_method=' + method; 
url += *&_mtype=execute' ; 
var params = '&pcount=0'; 

if (typeof (args) != 'undefined' && args. length) 

{ // add parameters 

params = '&pcount=' + args. length 
for (var i = 0; i < args. length; i++) 

var arg = argsCi] ; 

params += '&p' + i + '=' + 

„MSRS escapePl us (escape (arg)) ; 

} 
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url += params; 

} 

return url ; 
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<SCRIPT LANGUAGE="3avaScript" RUNAT=SERVER> 

I j it it 'k it it if it it is it it it "it i% ic it it ii ic it ii if it "if "it *f "it it if ic it "it 

// Microsoft Script Library 

// visual interDev 6.0 RecordsetNavbar Object for ASP 

// Copyright 1998 Microsoft Corporation. All Rights Reserved. 

y ^ ^ it it i( it i( i( ii it ii it if if itic it it is it it it it it it it it it it it it it it it it it it it it it it it is it it it it 

f uncti on CreateRecordsetNavbar (st rName , f uncini t , ob j Parent) 

if (typeof (strName) ^= 'string' && strName != ") 

var obj RecordsetNavbar = new _RecordsetNavbar (strName) ; 
eval (strName + ' = ob j RecordsetNavbar; ') ; 
obj RecordsetNavbar. _f uncini t = funclnit; 
thisPage.advise(PAGE_ONlNlT, StrName + ' ._restoreState() ') ; 
return obj RecordsetNavbar ; 

return null ; 

} 

function .RecordsetNavbar (strName) 

^ if (typeof (_bRSNBPrototypeCal led) == 'undefined') 
_RSNB Prototype 0 ; 

//public members 
this. id = StrName; 
this. name = strName; 

^ - . _^y/ private properties 

^hTs,„buttons = new Array(this.„nButtonCount) ; 

// advise for default eventhandlers 
this.^objEventManager = CreateEventManaqerO ; 

thi s . _ob j EventManager . advi seDef aul tHandl er (thi s . name , rsnb_onfirstclick) ; 
thi s . _ob j EventManager . advi seDef aul tHandl e r (t hi s . name , RSNB_0NPREVI0USCLICK) ; 
thi s . _obj EventManage r . advi seDef aul tHandl e r (thi s . name , rsnb_ONNEXTCLICK) ; 
this. _ob j EventManager , advi seDef aul tHandl e r (t hi s . name , rsnb_onlastclick) ; 

} 

function _RSNB PrototypeO 

„bRSNBPrototypeCalled = 1; 
// events 

R5NB_0NFIRSTCLICK = ' onf i rstcl i ck ' ; 
RSNB_0NPREVI0USCLICK = ' onprevi ouscl i ck' ; 
RSNB__ONNEXTCLICK = ' onnextcl i ck' ; 
RSNB_0NLASTCLICK = ' onlastcl i ck' ; 

// constants 
RSNB_BUTTONFIRST = 0; 
RSNB_BUTTONPREV = 1; 
RSNB_BUTTONNEXT = 2; 
RSNB_BUTTONLAST = 3; 

RSNB_ALIGN„VERTICAL = 0; 
RSNB^LIGN_HORIZONTAL = 1; 

RSNB_MASK„FIRSTIMAGE = 1; 
RSNB_MASK_FIRSTCAPTION = 2; 
RSNB_MASK_PREVIMAGE = 4; 
RSNB_MASK_PREVCAPTION = 8; 
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RSNB_MASK_NEXTIMAGE = 16; 
RSNBJV|ASK„NEXTCAPTION = 32; 
RSNB_MASK_LASTIiviAGE = 64; 
RSNB„MASK_LASTCAPTION = 128; 



//public members 

_RecordsetNavbar. prototype. updateonMove = true; 
„RecordsetNavbar. prototype. pagesize = 1; 
_RecordsetNavbar. prototype. man ntainstate = true; 



//private members 

_RecordsetNavbar. prototype. _bvi si ble = true; 
„RecordsetNavbar. prototype. _nAlignment = RSNB_ALIGN_HORIZONTAL; 
_RecordsetNavbar. prototype. „nButtonMask = 0; 
„RecordsetNavbar. prototype, _bcancel ope rati on = false; 
_RecordsetNavbar. prototype. „objDataSource = null; 
„RecordsetNavbar. prototype. _nButtonCount = 4; 
„RecordsetNavbar. prototype. „nButtonNames = new 
ArrayC First* , 'Previous" , 'Next* , 'Last'); 

//public methods 

_RecordsetNavbar. prototype. isvi si ble = _RSNB_is visible; 
„RecordsetNavbar. prototype. show = „RSNB_show; 
_RecordsetNavbar. prototype. hide = _RSNB„hide; 
„RecordsetNavbar. prototype. getAlignment = _RSNB„getAlignment ; 
_RecordsetNavbar. prototype. setAlignment = _RSNB_setAlignment ; 
.RecordsetNavbar . prototype - setButtonStyl es = _RSNB_setButtonStyl es ; 
_RecordsetNavbar . prototype . getButtonStyl es = _RSNB_getButtonstyl es ; 
^RecordsetNavbar . prototype . cancel Operati on = „RSNB_cancel Operati on ; 
- . _ . . _RecordsetNavbar . prototype . i sOperati oncancel 1 ed = 
„RSMB_i sbpBrati onCancel 1 ed ; 

"D^ecordsetNavbar, prototype. getButton = _RSNB_getButton; 
_RecordsetNavbar . prototype . getDataSource = „RSNB_getDataSou rce ; 
_RecordsetNavbar. prototype. setDatasource = _RSNB_„setDataSource; 
_RecordsetNavbar. prototype. advise = _RSNB_advise; 
_Record5etNavbar. prototype. unadvise = _RSNB_unadvise; 
_RecordsetNavbar. prototype. display = _RSNB_di splay; 

//private methods 

^RecordsetNavbar. prototype. _onfirstcli ck = _RSNB onfi rstclick; 

_RecordsetNavbar . prototype onprevi ousel i ck = _RSNB onprevi ousel i ck ; 

_RecordsetNavbar, prototype. _onnextclick = „RSNB onnextclick; 

„RecordsetNavbar. prototype. „onlast click = _RSNB onlast click; 

_RecordsetNavbar . prototype ._createButtons = _RSNB createButtons ; 

_RecordsetNavbar. prototype. _f i reEvent = _EM fireEvent; 

_RecordsetNavbar . prototype ._preserveState = _RSNB preservestate ; 

_RecordsetNavbar. prototype. „restoreState = _RSNB restorestate; 

_Record5etNavbar. prototype. „hasstate = _rsnb hasstate; 

//scope implementation to _RSNB Prototype function 

function „RSNB_isvisibleO 

{ return this._bvisible; } 

function __RSNB_show() 

{ this.„bvisible = true; } 

function „RSNB_hideC) 

{ this._bvisible = false; } 



function „RSNB„getAlignmentO 

{ return this._nAlignment ; } 
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f uncti on _RSNB_setAl i gnment (nAl i gnment) 
{ t hi s._nAli gnment = nAl i gnment; } 

f uncti on _RSNB_setButtonStyl es (nButtonMask) 

{ thi s ._createButtons(nButtonMask) ; } 

function _RSNB_getButtonStyles() 

{ return this .„nButtonMask; } 

function _RSNB„canceloperation() 

{ thi s.„bcancel Operation = true; } 

f uncti on _RSNB_i sOperati oncancel 1 ed () 

{ return this._bcancelOperation; } 

function _RSNB_getButton(nlndex) 

^ if (nindex >= RSNBJUTTONFIRST && nindex <= RSNB_BUTTONLAST) 

return thi s. .buttons [nindex] ; 
return null ; 

} 

function _RSNB_getDataSource() 

{ return this._objDataSource; } 

function _RSNB_setDataSource(objDataSource) 

{ this._.objDataSource = objoatasource; } 

f uncti on _RSNB_advi se (st r Event , f uncToCal 1 ) 
. .^.{ ^ return this._objEventManager.advise(strEvent,funcToCall) ; } 

Tunction „RSNB„unadvise(strEvent,nAdviseiD) 

{ return this._objEventManager .unadvise(strEvent ,nAdviselD) ; } 
function _RSNB_display() 

if Cthis._bvisible) 

^ for (var i = RSNB_8UTT0NFIRST; i < this._nButtonCount; i++) 

if (this. .buttons [i] != null) 

thi s .^buttons [i ] . mai ntai nState = 



this. mai ntai nState ; 



rsnb_align_vertical) 



} 



} 



thi s ..buttons [i ] - di spl ay() ; 
if (i != RSNB„BUTTONLAST) 

if (thi s._nAli gnment == 

Response.write('<BR>') ; 

} 



thi s ..preserveStateC) ; 

} 

function _RSNB onfi rstclickQ 

^ thi s ..ob j EventManager . f i reEvent (RSNB.ONFIRSTCLICK) ; 

if (this.^objDataSource != null && ! this. _bcancel Operation) 

if (this.updateOnMove) 
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thi s ._objDataSource . updateRecordQ ; 
this._objDataSource.moveFirstC) ; 

} 

else ^ _ 

this._bcancelOperation = false; 

} 

function _RSNB onpreviousclickQ 

van objRS = this._objDataSource; 
if CobjRS == null) 

^ this._.objEventManager.fireEvent(RSNB_ONPREVlOUSCLlCK) ; 

thi s.„bcancel operation = false; 

else if (lobjRS.BOF) 

^ thi s ._ob j EventManager . f i reEvent (RSNB_.0NPREVI0USCLICK) ; 

if (I this. _bcancel Operation) 

^ if (this.updateonMove) 

objRS. updateRecordQ ; 
if (this.pagesize > 1) ^ . 

{ // move to first record of previous page 

var curPos = objRS.absolutePosition; 

var ncount = objRS.getCountQ ; 

if (objRS.EOF) curPos = nCount; 

if (curPos > 0 && ncount > 0) 

^ var curPage = (curPos - (curPos 5 

thi^.pages1ze)) / this.pagesize; 

if (curPage > 1) 
{ 

objRS_moveAbsolute(((curPage-l) * this.pageSize)^+ 1); 

else 

ob j RS . moveFi r st () ; 

return; 

} 

} 

// otherwise, move to previous record 
objRS.movePreviousQ ; 

if (objRS.BOF) 

objRS. moveFi rst() ; 



} 

else 



thi s._bcancel operation = false; 



} 

} 

function _RSNB onnextclickQ 

^ var objRS = this._objDataSource; 

if (objRS ^= null) 



thi s ._obj EventManager , fi reEvent(RSNB__ONNEXTCLlCK) ; 
this.„bCanceloperation = false; 

} 

else if (!ob]RS.EOF) 

^ thi s. _obj Even tManager.fireEvent(RSNB_ONNEXTCLlCK) ; 
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if (!this._bCancelOperation) 

if (this.updateOnMove) 

ob j RS , updateReco rd Q ; 
if (this.pageSize > 1) 



{ 



1) % this.pageSize)) / this.pageSize; 

this.pageSize; 

nCount) 



} 



// move to first record of next page . 
var curPos = obqRS.absolutePosition; 
var nCount = objRS.getCountO ; 
if (objRS.BOF) curPos = 1; 
if (curPos > 0 && nCount > 0) 

var curPage = (curPos - ((curPos - 

var newPos = curPage * 

if (newPos + this.pageSize <= 

newPos += this.pageSize; 
ob j RS . moveAbsol ute (newPos) ; 
return; 



} 

else 



// otherwise, move to next record 
objRS.moveNextO ; 
if (objRS.EOF) 

objRS.moveLastC) ; 



this._bcancel0peration = false; 



T 



!= 0) 
: 0; 



function „RSNB onlastclickO 

this. _ob j EventManager . f i reEvent (rsnb_ONLASTCLICK) ; 

if (this._objDataSource != null && !this._bcancel Operation) 

if (this.updateOnMove) 

this._objDataSource. updateRecordO ; 
thi 5._objDataSource.moveLast() ; 

} 

else 

thi s._bcancel Operation = false; 

} 

function _RSNB createButtons(nButtonMask) 

var obj Button = null; 
var buttonType; 

this,_nButtonMask = nButtonMask; 

if ((nButtonMask & (RSNB_MASK_FIRSTIMAGE | RSNB„MASK_FIRSTCAPTION)) 



{ 



buttonType = ((nButtonMask & RSNB_MASK„FIRSTIMAGE) 1= 0) ? 1 

obq Button = CreateButton (this. name + ' First*, null , null) ; 
obj Button - setstyl e (buttonType) ; 

objButton.adviseConclick' , this. name + ' ._onfirstclick() ') ; 
this, .buttons [RSNB.BUTTONFIRST] = obj Button; 



0) 



if ((nButtonMask & (rsnb_mask_previmage 
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buttonType = ((nButtonMask & rsnb_mask_previmage) != 0) ? 1 

: 0; 

objButton = CreateButtonCthis.name + 'previous' , null , null) ; 

ob q Button , setstyl e (buttonType) ; 

obj Button. advi seC ' oncl i ck ', this. name + 

' ._onpreviousclickC) ') ; 

this. .buttons [RSNB^BUTTONPREV] = obj Button; 

if ((nButtonMask & (RSNB„MASK_NEXTIMAGE | R5NB_MA5K_NEXTCAPTI0N)) != 



0) 
: 0; 



0) 
: 0; 



^ buttonType = ((nButtonMask & RSNB_MASK_NEXTIMAGE) != 0) ? 1 

obqButton = CreateButton(this.name + 'Next' , null , null) ; 
obi Button . setstyl e (buttonType) ; 

obj Button. advisee one! i ck ', this. name + ' .„onnextclick() ') ; 
this.„buttons[RSNB_BUTTONNEXT] = obj Button; 

if ((nButtonMask & (RSNB„MASK_LASTIMAGE | RSNB_MASK_LASTCAPTION)) ! = 



{ 



buttonType = ((nButtonMask & rsnb_mask_lastimage) != 0) ? 1 

objButton = createButton (this -name + 'Last' , null , null) ; 
obj Button . setstyl e (buttonType) ; 

obj Button. advi se( ' oncl i ck ', this. name + ' ._onlastclick() ') ; 
this._buttonsCRSNB_BUTTONLAST] = obj Button; 



Tunction _RSNB preserveStateO 

if (thi s .maintainstate) 

var state = new Object; 

state. _bvi si ble = this._bvisible; 

if (this.^nAlignment != rsnb^lign_horizontal) 

state. _nAlignment = this._nAlignment ; 
if ( ! thi s - updateOnMove) 

state. updateOnMove = false; 
if (this.pagesize != 1) 

state. pageSize = this.pagesize; 

return thi sPage . persi ststate(thi s . name , state) ; 
return false; 

} 

function _RSNB restoreStateO 

this._fi reEvent(this.„funclnit) ; 
if (this. maintainstate) 

var state = thi sPage.unpersiststate(this. name) ; 
if (state != null) 

if (state. _bvi si ble != null) 

this._bvisible = (state. _bvi si ble != 'false 

&& state. _bvi si ble !- '0'); 

else 

this.^bvisible = true; 
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if (state. _nAlignment != null) 
this._nAlignment = 

Number(state ._nAl i gnment) ; 

else 

t hi s._nAli gnment = RSNB^LIGNJORIZONTAL; 

if (state.updateOnMove != null) 

this.updateOnMove = (state.updateOnMove ! 

'false' && State.updateOnMove != '0'); 

else 

this.updateOnMove = true; 

if (state. pagesize != null) 

this.pagesize = Number(state. pagesize) ; 

else 

this.pagesize = 1; 

} 

return true; 
return false; 

} 

function „RSNB hasStateO 

if (this.maintainstate) 

return thi sPage . i sStatePersi sted (thi s . name) ; 
return false; 

} 

}. ^J/ end of _RSNB Prototype function 

'</SCRIPT> " 
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II Microsoft Script Library<BR> 

// visual interDev 6.0 RecordsetNavbar Object for DHTML<BR> 

// Copyright 1998 Microsoft Corporation, All Rights Reserved. <BR> 

// <B>Do not modify in design view. Switch to source view.</B><BR> 

II <SCRIPT> 

function CreateRecordsetNavbar (st rName , f uncini t , obj Parent) 

if Ctypeof (strName) == 'string' && strName != ") 

^ if (typeof(RSNB_ONFlRSTCLiCK) == 'undefined') 

{ // define RSNB constants 

RSNB.ONFIRSTCLICK = 'onfi rstcl ick' ; 
RSNB_0NPREVI0USCLICK = ' onpreviouscl i ck ' ; 
RSNB_ONNEXTCLICK = ' onnextcl i ck' ; 
RSNB_ONLASTCLICK = ' onl astcl i ck ' ; 

RSNB_BUTTONFIRST - 0; 
RSNB_BUTTONPREV = 1; 
RSNB_BUTTONNEXT = 2; 
RSNB_BUTTONLAST = 3; 

RSNB_JVLIGN_VERTICAL = 0; 
RSNB^LIGN^HORIZONTAL = 1; 

RSNB„MASK_FIRSTIMAGE = 1; 
RSNB„MASK„FIRSTCAPTION = 2; 
RSNB„MASK„PREVIMAGE = 4; 

- RSNB_MASK_PREVCAPTION = 8; 

RSNB_MASK„NEXTIMAGE = 16; 
RSNB_MASK_NEXTCAPTION =32; 
RSNB_MASK_LASTIMAGE = 64; 
RSNB„MASK„LASTCAPTION = 128; 

_RSNB_BUTTONCOUNT = 4; 
_RSNB_BUTTONNAMES = new 
ArrayC'Fi rst' , 'Previous' , 'Next' , 'Last'); 

if ((obj Parent != null) && (typeof (obj Parent) 'object')) 

^ var strHTML = + 'span name="' + strName + '" id="' + st 

+ ' "></span>' ; ^ 

obj Parent . i nsertAd j acentHTlv!L( ' Bef oreEnd , st rHTML) ; 

} 

else ,.,..„. 
document, write('<' + 'span name="' + strName + id= 

StrName + '"></span>'); 

objspan = eval (strName) ; 

if ((objspan == null) || (typeof (obj Span) != 'object')) 
return null ; 

//public members 
ob]'Span.pageSize = 1; 
obj span. updateOnMove = true; 
objspan. isvi si ble = _RSNB_isvisible; 
objSpan.show = _RSNB„show; 
obj Span. hide = _RSNB_hide; 
obj span. getAlignment = „RSNB_getAlignment ; 
obiSpan.setAlignment = _RSNB„setAlignment ; 
objSpan.setButtonStyles = _RSNB_setButtonStyles ; 
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objSpan.getButtonStyles = „RSNB„getButtonStyles; 

objspan.canceloperation - _RSNB_cancel Operation; 

obj span. isoperationcancel led = ^RSNB.isoperationCancelled; 

obj Span. get Button = _RSNB_getButton; 

obj Span. get Datasource = „RSNB_getDataSource; 

objSpan.setDataSource = _RSNB_setDataSource; 

obj span. display = „RSNB_di splay; 

obj Span. advise = _RSNB_advise; 

obj Span. unadvise = _RSNB_unadvise; 

//private members 

obj span. „onfirstclick = _RSNB_onfi rstclick; 

obj span. _onprevi ousel ick = _.RSNB onprevi ousel ick; 

obj Span. _onnextclick = _RSNB onnext click; 

obj Span. _onlastcl ick = _RSNB onlastclick; 

obj Span. _nAlignment = RSNB^LIGN_H0RIZ0NTAL ; 
obj Span. „obj Datasource = null; 
objSpan._fireEvent = _RSNB_fi reEvent ; 
obj span. _bcancel ope rati on = false; 
obj Span. „nButtonMask = 0; 
obj Span. „bcreated = false; 

// advise for default eventhandlers 
objSpan._objEventManager = CreateEventManagerQ ; 

objSpan.„fireEventC_RSNB onbeforefuncini t(' + objspan.id + ) ); 

obj span. _fi reEvent (funclnit) ; 

return objspan; 

return null ; 

} 

function „RSNB GenerateRecordsetNavbar(objSpan,nButtonMask) 

var strsepcontent = '<br> ; 

var strName = obj Span. name; 

var nAlignment = objSpan,_nAlignment ; 

this._nButtonMask = nButtonMask; 

if (nAlignment =- RSNB_ALIGN_H0RlZ0NTAL) 
strsepcontent = ' ' ; 

var strspancontent = * ' ; 

var buttonType; 

var objButton = null; 

if ((nButtonMask & (RSNB_MASK„FIRSTIMAGE | RSNB_MASK„FIRSTCAPTION)) != 0) 

^ buttonType - ((nButtonMask & RSNB_MASieFlRSTlMAGE) != 0) ? 1 : 0; 

objButton = createButton(strName + '.ButtonO' ,null ,obiSpan) ; 
obj Button. advise(BTN_ONCLlCK, StrName + ' .„onfi rstclickO ') ; 
obj Button . setstyl e (buttonType) ; 
strspancontent = strSepContent ; 

} 

var strseparatorspan = '<span id=="' + strName + '„SpanO">' + strspancontent 
+ '</span>' ; 

objspan. insertAdjacentHTML('BeforeEnd' .strseparatorspan) ; 
strspancontent = ' ' ; 

if ((nButtonMask & (rsnb„mask_previma6E | rsnb__mask_prevcaption)) != 0) 
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buttonjype = (CnButtonMask & rsnb_mask_previmage) != 0) ? 1 : 0; 
objButton = CreateButtonCstrName + '_Buttonl^nu^l ,obiSpan) ; 
objButton.advise(BTN_ONCLlCK,strName + \_onprevi ousel ick() ); 
ob j Button . setstyl e (buttonType) ; 
strSpanContent = strsepcontent ; 

} 

strseparatorspan = '<span id="' + strName + '_Spanl">' + strSpanContent 

</span>^^_^ span . i nsertAd j acentHTML( ' Bef oreEnd ' , strseparatorspan) ; 
StrSpanContent = ' ' ; 

if (CnButtonMask & (RSNB_MASK_NEXTIMAGE | RSNB_MASK_NEXTCAPTION)) != 0) 

^ buttonType = (CnButtonMask & rsnb„mask_nextimage) != 0) ? 1 : 0; 

objButton = CreateButtonCstrName + '_Button2' ,null ,objSpan) ; 
objButton.advise(BTN_ONCLlCK, StrName + ' ._onnextclick() ); 
objButton. setstyl eCbuttonType) ; 
StrSpanContent = strSepContent ; 

} 

strseparatorspan = '<span id="' + strName + '_Span2">' + strSpanContent 

</span>^^_^ span . i nsertAd j acentHTML C ' Bef oreEnd ' , strseparatorspan) ; 
StrSpanContent = ' ' ; 

if C CnButtonMask & CRSnb_mask_lastimage | rsnb„mask_lastcaption)) != 0) 

^ buttonType = CCnButtonMask & rsnb_mask„lastima6E) != 0) ? 1 : 0; 

objButton = CreateButtonCstrName + '_Button3' , null , obi Span) ; 
* ' ^ obj Button. adviseCBTN^ONCLlCK, StrName + ' ._onlastclickC) ); 

objButton. setstyl eCbuttonType) ; 

objspan._bcreated = true; 



function _RSNB.isvisibleC) .^^ ,^ 

{ return Cthis. style. visibility != hidden ); J- 

function _RSNB_showC) . ^ 

{ this. style. visibility = 'visible ; } 

function _RSNB_hideC) .... 

{ this. style. visibility = 'hidden ; } 

function _RSNB_getAlignmentC) 

{ return this._nAlignment ; } 

f uncti on _RSNB_setAl i gnment CnAl i gnment) 

^ i f C ! i sNaNCparseint CnAl i gnment))) 

this._nAliqnment - nAli gnment; 
if Cthis. _bcreated) 

var strTolnsert = <br> ; 
if CnAl i gnment RSNB^LIGN_H0RIZ0NTAL) 
StrTolnsert = ' ' ; 



for Cvar nindex = 0; nindex < 3; ++ nindex) 

^ var objspan = document. all Cthis. id + '_Span' + 
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nindex) 

if ((objSpan != null) && (objSpan.innerHTML 

strTolnsert)) 

ObjSpan.innerHTML = strTolnsert; 

} 

return true; 

} 

return false; 

} 

function _RSNB_,setButtonStyles(nButtonMask) 

{ _RSNB GenerateRecordsetNavbarCthis, nButtonMask) ; } 

function _,RSNB„getButtonStyles() 

{ return this.„nButtonMask; } 

f uncti on _RSNB_cancel Operati on () 

{ this._bcancel Operati on = true; } 

f uncti on _RSNB„i sOperati oncancel 1 ed() 

{ return this._bCancelGperation; } 

function _RSNB„getButton (nindex) 

if ( (nindex >= RSNB„BUTTON FIRST) && (nindex <= RSNB_BUTTONLAST)) 
return document .all (this. id + '_Button' + nindex); 
return null ; 

} 

f uncti on ^SNB_.getDataSource() 

{ rettrrn this.^objDatasource; } 

f uncti on _RSNB_setDataSource (ob j Reco rdset) 

{ this._objDataSource = obj Recordset; } 

f uncti on _RSNB_advi se(st rEvent , f uncTocal 1 ) 

{ return thi s.„objEventManager.advise(str Event, f uncTocall ) ; } 
function _RSNB_unadvise(st rEvent, nAdviselD) 

{ return this. _objEventManager.unadvise(st rEvent , nAdviseiD); } 

function _RSNB_display() 
{ } 

function _RSNB onfi rstclick() 

{ 

thi s . _ob j EventManager , f i reEvent (rsnb_ONFIRSTCLICK) ; 

if (this.„objDatasource != null && !this._bCancelOperation) 

if (this.updateOnMove) 

this._objDataSource,updateRecord() ; 
this._objDataSource.moveFi rst() ; 

} 

else 

this._bCancelOperation = false; 



function _RSNB onprevi ousel ick() 

if (this.^objDataSource == null) 

this._objEventManager.fi reEvent (rsnb^onpreviousclick) ; 
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this._bCancelOperation = false; 

else if (!this._objDataSource.BOF) 

thi s ._obj EventManager . f i reEvent Crsnb„onpreviousclick) ; 
if (! this._bCancelOperation) 

if (this.updateOnMove) 

thi s ..objDataSource . updateRecordC) ; 
if (this.pagesize > 1) 

{ // move to first record of previous page 

var curPos = this._ob3'DataSource.absolutePosition 
var ncount = this._.objDataSource.getCountC) ; 
if Cthis._objDataSource.EOF) curPos = ncount; 
if CcurPos > 0 && ncount > 0) 

var curPage = (curPos - (curPos % 

this.pagesize)) / this.pagesize; 

if (curPage > 1) 
{ 

this._objDataSource.moveAbsolute((CcurPa^e-l) * this.pagesize) + 1); 

else 

this. _ob j Datasou rce . movePi r st Q ; 

return; 

} 

} 

// otherwise, move to previous record 
: - ^ this._objDataSource.movePrevious() ; 

if (thi s-_obj Datasou rce. BOF) 

this._objDataSource.moveFi rst() ; 



} 

else 



thi s._bcancel Operation = false; 



function _RSNB onnextcli ckC) 

if (this._objDataSource == null) 

^ thi s ._ob j EventManager . f i reEvent (RSNB_0NNEXTCLICK) ; 

thi s._bcancel operation = false; 

else if (! thi s._obj Datasou rce. EOF) 

^ this._objEventManager.fi reEvent (RSNB_0NNEXTCLICK) ; 

if (! this. _bcancel operation) 

if (this.updateOnMove) 

thi s .„obj Datasou rce . updateRecordO ; 

if (this.pagesize > 1) 

{ // move to first record of next page 

var curPos = this._objDataSource.absolutePosition 
var ncount = this._objDataSource.getCount() ; 
if (t hi s.„obj Datasou rce. BOF) curPos = 1; 
if (curPos > 0 && ncount > 0) 

var curPage = (curPos - ((curPos - 1) % 
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// Microsoft Script Library 

//visual interDev 6.0 Remote scripting proxy 

// Copyright 1998 Microsoft Corporation. All Rights Reserved. 

import java. applet,^'; 
import java.awt.*; 

import java.net , URL; 
import java.io.lnputstream; 
import java.io.IOException; 



// Main class for applet RSProxy 
// 
// 



public class RSProxy extends Applet implements Runnable 
{ 

// APPLET INFO SUPPORT: 

// The getAppletlnfoO method returns a string describing the applet's 
// author, copyright date, or miscellaneous information. 

public String getAppletlnfoO 

return "Name: RSProxy\r\n" + 

"Author: Microsoft\r\n" + 

"copyright (c) 1998 Microsoft corp."; 

publ-TC void initC) { resizeCO,0); } 

public void destroy C) {} 

public void paint (Graphics g) {} 

public void start Q {} 

public void stopO {} 



// Event Status codes 



static final int e_fail = -1; 
static final int S_C0MPLETED = 0; 
static final int S__PENDING = 1; 
static final int s^partial = 2; 



// Request Object Definition 



static final int REQUEST_NEXT = 0; 
static final int request.prev = 1; 
static final int request_.id = 2; 
static final int request„url = 3; 
static final int request_urlcontext = 4; 

static final int request_mode = 5; 

static final int request„thread = 6; 
static final int c_request - 7; 

// Request Object Modes 



static final int request_mode_complete = 0; 
static final int request_mode_partial = 1; 
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// Response objec£ Defi ni ti on 

// 

static final int response_next = 0; 

static final int RESP0NSE_REQUESTID = 1; 

static final int RESP0NSE_STATUS = 2; 

static final int response_message = 3; 

static final int response_data = 4; 

static final int C_RESPONSE = 5; 

// other constants 

static final int BUFFER_SIZE =512; 

static final int expected_max_.concurrent_calls = 5; 



// Private Members 

// Request list. Requests are inserted at head and removed when completed, 
private Object m_requestLock; 
private object [] m_requestHead; 
// Response queue, 
private object m„responseLock; 
private object [] m_responseHead; 
private 0bject[] m_responseTail ; 



// Public Methods 



// RSProxy class constructor 
* --ijublic RSProxy () 

m„requestLock = new objectQ; 
m_responseLock = new objectC); 

} 

// initiates a request given an id and url ^ c-^ ■ .-^i- 

public void startRequest(Stri ng requestiD, String url_context, String url, int 

mode) 



{ 



object[] request = newRequest(requestID,url_context , url , mode) ; 
i nsertRequest (request) ; 
Thread thread = new Thread(thi s , requestiD) ; 

request [REQUEST_thread] = thread; 
thread. start O ; 

} 

// used to poll applet for response 
public synchronized boolean wai tForResponseC) 

^ // a response is already queued up 
if (null != m_responseHead) 
return true; 

// a response cannot be generated without a request 
if (null == m_requestHead) 
return false; 

try . . 

{ // try waiting for a response 

while (null == m„responseHead) 
wai t() ; 
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return true; 

} 

catch (Inter ruptedExcepti on ie) 
return false; 

} 

} 

public synchronized void cancel Request (String requestid) 

object [] request = findRequest(requestld) ; 

if (request == null) 
return ; 

if (request [REQUEST„THREAD] != null) 

((Thread) request [REQUEST„THREAD] ) .stopO ; 

// The following methods get the response information 
// Only the UI thread should call these methods, 
public boolean hasResponseO 

return null != m_responseHead; } 

public void endResponseO 

removeResponseO ; } 

public string getRequestID() 

if (null == m_responseHead) 
return 

return (string)m_responseHead[RESPONSE_REQUESTlD] ; 

publ-i-c int getStatusO 

if (null == mu.responseHead) 
return 0; 

return getlnteger(m_responseHead[RESPONSE_STATUS]) ; 

public string getMessageO 

if (null =~ m_responseHead) 
return 

return (String)m_responseHead[RESPONSE_MESSAGE] ; 

public String getDataO 

if (null =- m^responseHead) 
return 

return (string)m_responseHeadCRESPONSE„DATA] ; 



/ Runnable Protocol 

// 

public void run() 

String requestiD = Thread. currentThread() . getNameO ; 
runt) rlDownloadTh read (requestiD) ; 



/ Protected Methods 
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// : 



// Spawns worker thread to asynchronously retrieve data for given request 
protected void runurl Down! oadrhreadCst ring requestiD) 

Object[] request = findRequestCrequestiD) ; 
obj ect [] response ; 

if (null == request) 

response = newErrorResponseCrequestlD, "unknown request id,"); 

else 
{ 

try 

int bytesRead; 

byte [J buffer = new byte[BUFFER_si2E] ; 

URL contextURL = new 
URL((Stri ng) request [REQUEST_URLCONTEXT] ) ; 

InputStream stream = new 
~,,,URL (contextURL, (stri ng) request [REQUEST^URL] ) ,openStream() ; 

stringBuffer responsesuffer = new stringBufferQ ; 

g while (-1 != (bytesRead = stream. read(buffer))) 

:f if (request [REQUEST_MODE] == 

=^^^^getob j ect (request_mode_.partial) ) 

ll { // generate response as partial data 

"^buffers are received 

2 response = 
^^"^newDataResponse(requestID,new string(buffer, 0,0, bytesRead) , false) ; 

hand! eResponse(request , response) ; 

3"-" } 

— else //if (request [request_mode] == 
Jgetob j ect (request_mode_complete) ) 

t { // generate a single response when 

^:^request is complete 

3 responsesuffer . append(new 
l5tring(buffer, 0,0, bytesRead)) ; ^ 

stream. closeO ; 

if (request [REQUEST_MODE] == 

getob j ect (request_mode„partial) ) 

response - newDataResponse(requestID, 

true) ; 

else //if (request [REQUEST_MODE] == 
getob j ect (request_mode„complete) ) 

response = 

newDataResponse(requestlD, responsesuffer .toStringO ,true) ; 
catch (Exception e) 

response = newErrorResponse(requestlD,e.getMe5sage()) ; 

^ } 

handl eResponse(request , response) ; 

} 

// handle response, inserts response into queue, removes request when 

complete 

protected synchronized void handleResponse(object [] request .Object [] response) 
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^ insertResponse(response) ; 

int status = getlntegerCresponse[RESPONSE„STATUSj) ; 
if Cs__C0MPLETED == Status II E_FAIL == status) 

removeRequest (request) ; 
notifyAll C) ; 

} 



// object constructors 



mode) 
{ 



// constructor for new Request object . t ^ ^ c^^-: 

protected object [] newRequest (string requestID, string url_context , Stn 



ng url ,int 



request = new object [c_request] ; 



ObjectCj 

request [REQUEST_ID] = requestiD; 
request"" ~ '"'"^ " 

request 
request 



request_url] = url ; 
request_urlcontext] = url_context; 
request_mode] = getobject(mode) ; 



return request; 

1 // constructor for new Response object . u^^i^^k. 

: protected 0bject[] newDataResponse(Stn ng requestiD, Stri ng data, boolean 

^finished) 

1 ^ 0bject[] response = new object [C_RESP0NSE] ; 

1 response [RESPONSE_REQUESTID] = requestiD; . . . _ ^ r-n^o. r-rtm . <; PARTTAIV 

: response[RESPONSE„STATUS] = new lnteger(fimshed ? S_.COMPLETED . S.partial) , 

response [RESPONSE_MESSAGE] - "completed"; 
"^response [response^data] = data; 
I -return response; 

■i > 

3 // constructor for new ErrorResponse object , 

J protected Object [] newErrorResponse(Stri ng requestiD , Stri ng message) 

' ^ objectC] response = new Object [C__RESPONSE] ; 
response [RESPONSE„REQUESTID] = requestiD; 
response [RESPONSE„STATUS] = new lnteger(E_FAlL) ; 
response [RESPONSE_MESSAGE] = message; 



response 

} 



^RESPONSE_DATA] = ""; 
return response; 



// list management routines 



// find a given request object in the request list 
protected Object [] findRequest (String requestiD) 

^ synchronized (m„requestLock) 
. { 

fSr^(i" iliirequestHead; null 1= i; i = (object [])i [REQUEST_NEXT]) 

if (0 ==^reguestID.compareTo((String)i [REQUESTED])) 
return i ; 
} 

} 

return null ; 
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// insert a request object at the head of the request list 
protected void i nsertRequest (object [] request) 

synchronized (m_requestLock) 

request [REQUE5T_PREV3 = null; 

request [REQUEST^NEXT] = m_requestHead; 

if (null != m_requestHead) 

m„requestHeaci[REQUEST_PREV] = request; 
m^requestHead = request; 

} 

// remove a request object from the request list 
protected void removeRequestCobjectC] request) 

^ synchronized (m_requestLock) 
{ 

if (null request [REQUEST_PREV]) 

m_requestHead = (obj ect[]) request [request„next] ; 

J ^""^^((ObjectCDrequest [REQUEST„PREV]) [request_next] = 

]request[REQUEST_NEXTJ ; 

^ if (null !- request Crequest_NEXT]) 

( (Obi ect[]) request [REQUEST^NEXT] ) [REQUEST_PREV] = 

request [request_prev] ; 

I > 

^ ' insert a response object onto the tail of the queue 

protected void insertResponse(Object [] response) 

^ synchronized (m_responseLock) 

I if (null == m„responseHead) 

m„responseHead = response; 
m„responseTail = response; 

else 

m_responseTail [RESP0NSE_NEXT] = response; 
m_responseTail = response; 

} 

} 

// remove response at the head of the queue 
protected void removeResponseO 

^ synchronized (m^responseLock) 

if (null != m_responseHead) 

m_responseHead = (object [])m_responseHeadCRESPONSE_NEXT] ; 
if (null == m_responseHead) 
m_responseTail = null; 

} 

} 
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// private helper functions 



// casts int as object 

private object getObject(i nt integer) 

{ return new integer Ci nteger) ; } 

// casts Object as int 

private int getintegerCobject ob]) 

^ if (null == obj) 

return 0; 
return ((integer)obj) .intvalueO ; 

} 
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<SCRIPT RUNAT=SERVER LANGUAGE=" JavaScri pt"> 

// Microsoft script Library 

// Visual interDev 6.0 Textbox Object for ASP 

// Copyright 1998 Microsoft Corporation. All Rights Reserved. 

f uncti on CreateTextbox(st rName , f uncini t , ob j Parent) 

if (typeofCst rName) == "string' && strName != '') 

var objTextbox = new „TextboxCstrName) ; 
eval (strName + " = objTextbox;"); 

objTextbox. _f uncini t = funclnit; 

thisPage,advise(PAGE„ONlNIT, StrName + ' ._restorestateO ') ; 
return objTextbox; 

} 

return null ; 

} 

r^fpunction _Textbox(st rName) 

B if (typeof C_bTXTPrototypeCaned) == 'undefined') 

0 ^XT_Prototype(); 

^tf // public members 

J\ this, id = StrName; 

3 this, name == strName; 

// private members 
- " ':'th^s._objEventManager = CreateEventManagerC) ; 

"J -t+ii s . _ob j EventManager . advi seDef aul tHand T er (thi s . name , txt_onchange) ; 

tf uncti on _txt Prototype () 

3 _bTXTPrototypecalled = 1; 

^ //events 

TXT„ONCHANGE - 'onchange'; 

//constants 

TXT_TEXTBOX = 0; 
TXT_TEXTAREA = 1; 
TXT_PASSWORD = 2; 

// public members 

_Textbox. prototype. disabled = false; 

_Textbox.prototype.value = 

„Textbox. prototype. maintainState = true; 

// private members 
_Textbox. prototype. _bvi si ble = true; 
„Textbox.prototype._objDataSource = null; 
_Textbox. prototype. _strDataFi eld = 
_Textbox. prototype. _nRowCount = 1; 
_Textbox.prototype._nColumnCount = -1; 
_Textbox. prototype. „nMaxLength = -1; 
_Textbox.prototype._nstyle = txt_.textbox ; 

//public methods 

„Textbox.prototype.isVisible = „TXT_isVisible; 
_Textbox. prototype. show = _TXT„show; 
_Textbox. prototype. hide = _TXT_hide; 
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_Textbox. prototype. getcolumncount = „TXT„getColumnCount; 
_Textbox. prototype. setcolumncount = _TXT„setColumnCount; 
_Textbox. prototype. getRowcount = _TXT„getRowCount ; 
_Text box. prototype. setRowCount = _TXT_setRowCount ; 
„Textbox. prototype. getMaxLength = _TXT_getMaxLength ; 
_Textbox, prototype. setMaxLertgth = „TXT_setMaxLength; 
„Textbox. prototype- getDataSource = _SOM_getDataSource; 
_Textbox. prototype. setDatasource = _SOM_setDataSource; 
„Textbox.prototype.getDataField = _SOM„getDataFi el d ; 
_Textbox. prototype. setDataFi eld = „SOM_setDataField; 
^Textbox. prototype. getstyle = _TXT_getstyl e ; 
_Textbox, prototype. setstyle = _TXT„setstyle; 
_Textbox. prototype. advise = _TXT„advise; 
_Textbox. prototype. unadvise = _TXT_unadvise; 
„Textbox. prototype. display = „TXT_di splay ; 

//private methods 

_Textbox. prototype. _f i reEvent = _EM fireEvent; 

_Textbox. prototype. ^preservestate = _TXT_preservestate; 

_Textbox. prototype. _restoreState = _TXT restorestate; 

„Textbox. prototype. _hasstate = _TXT hasstate; 

„Textbox. prototype. „onrowenter = _txt onrowenter; 

_Textbox. prototype. „onbeforeupdate = _TXT onbeforeupdate; 

//scope implementation in _TXT Prototype function 

function „TXT_i5VisibleC) 

{ return this._.bvisible; } 

function _TXT_showC) 
_{ this.^bvisible = true; } 

-function _TXT_hide() 

{ this.„bvisible = false; } 

function _TXT_getColumncount() 

{ return this.^nColumnCount; } 

f uncti on _TXT_setCol umnCount (ncol umnCount) 

if (!isNaN(parselnt(nCol umnCount)) && ncol umnCount > 0) 

this-„nCol umnCount = Number(ncolumncount) ; 
return true; 

} 

return false; 

} 

function _TXT_getRowCount() 

{ return this._nRowCount; } 

function _TXT_setRowCount(nRowCount) 

if (!isNaN(parselntCnRowCount)) && nRowCount > 0) 

this._nRowCount = Number (nRowcount) ; 
return true; 

} 

return false; 

} 

f uncti on _TXT_getMaxLength () 
{ return this._nMaxLength; } 
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f uncti on _TXT„setMaxLength (nMaxLength) 

if (!isNaN(parselnt(nMaxLength)) nMaxLength > 0) 

this.„nMaxLength = Number(nMaxLength) ; 
return true; 

} 

return false; 

} 

function _TXT_getstyleO 

{ return this._nstyle; } 

f uncti on _TXT_setStyl e (nstyl e) 
{ 

if CMsNaNCparselntCnStyle)) nstyle >= TXT_textbox && nStyle <= 

TXT„PASSWORD) 

this.^nstyle = NumberCnStyle) ; 
i return true; 

I return false; 

j } 

i function _TXT_advi5e(5trEvent,funcTocan) 

{ return this.„objEventManager,adviseCstrEvent jfuncToCall) ; } 

function _TXT_unadvi se (str Event ,nAdviselD) 

{ return this.^objEventManager ,unadviseCstrEvent,nAdviseID) ; } 

^ ' "^function _TXT_di spl ay() 

if (this._bvisible) 
{ 

var strHTML; 

if (this. disabled && IthisPage.isDHTMLBrowserO) 
{ // mimic disabled textbox on non-DHTML browsers 

StrHTML = '<TABLE border=l bordercolor=#808080 

bordercolordark=#696969 bordercolorlight=#COcOcO eel 1 paddi ng=0 

eel 1 spaci ng=0><TR><TD> ' 

StrHTML += '<TABLE border=0><TR><TD width=* + 
this._nColumncount * 8 + 'xFONT color=#696969>  ' + this. value + 
' &nbsp ; &nbsp ; </FONT></td></tr></table> ' ; 

StrHTML += '</TD></TR></TABLE>\n' ; 

} 

else 

if (this.__nstyle == txt_textarea) 

StrHTML = + 'textarea id="' + this. id + 
name="' + this. name + rows=* + this.„nRowCount; 

if (this.„nColumnCount 1= -1) 
StrHTML += ■ cols=:' + 

thi s ._nCol umncount ; 

if (I this. disabled) 

{ // output client events to callback 

to server 

var strHandler = 
thi s ._obj EventManager . generated i entnandl ers (thi s . name) ; 

StrHTML StrHandler; 

} 

else 
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} 

else 
{ 



type="password" id="' 

this. _nCol umncount ; 
thi s . _nMaxLength ; 

T^erver.HTMLEncodeCthis. value) + 
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strHTML += ' disabled' ; 
strHTML += + this, value + 



if Cthis._nstyle == txt^password) 

StrHTML = + 'INPUT 

else 

StrHTML = + 'INPUT type="text" 

StrHTML += thi 5. id + name='*' + this. name 

if (thi s._nCol umncount != -1) 
StrHTML += ' size=' + 

if (this.^nMaxLength != -1) 

StrHTML += ' maxLength=' + 

if (this._nstyle != TXT„PASSWORD) 

StrHTML += ' value='" + 

if (I this. disabled) 

{ // output client events to callback 



^fto server 

yl var strHandler = 

r'thi s ._ob j EventManager . generated i entHandl ers (thi s . name) ; 

J- StrHTML += StrHandler; 

■ - else 

S — StrHTML += ' disabled'; 

%^ StrHTML += '>\n* ; 

ri } 
n } 

vy Response. Write (strHTML) ; 

□ } 

this._preserveState() ; 

} 

function „TXT preservestate() 

if (this.maintainState) 
{ // preserve state in hidden field 

var state = new Object; 
state. _bvi si ble = this.^bvisible; 
if (this -disabled) 

state -disabled = true; 
if (this._nstyle != txt_textbox) 

state. „nstyle = this._nstyle; 
if (this._nRowCount != 1) 

state. _nRowCount = this._nRowCount; 
if (thi s._nCol umncount != -1) 

state. „nCol umncount = thi s._nCol umncount; 
if (this.„nMaxLength 1= -1) 

state. _nMaxLength = this._nMaxLength; 
if ((this. disabled || !this._bvisible) && this.„nstyle !== 

TXT_PAS SWORD) 

state. value = this. value; 
return thisPage.persistState(this. name, state) ; 

return false; 
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function _TXT restorestateC) 

var r = false; 

thi s .„f i reEventCthi s ._f uncini t) ; 
if (this.maintainstate) 

{ // attempt to restore previous state 

var state = thi sPage.unpersistState(this. name) ; 

if (state != null) 

{ 

if (state. _.bvi si ble 1= null) 

this._bvisible = (state. _bvi si ble '0' && 



state. _bvi si ble != 'false'); 



^r^state. disabled != 'false') 



"Number (state. _ncolumncount) ; 



Number (state. _nMaxLength) ; 



else 



this ._bvi sible = true; 



if (state. disabled != null) 

this. disabled = (state. disabled != '0' && 



else 



this, disabled = false; 



if (state. _nStyle != null) 

this._nstyle = Number (state. „nstyl e) ; 

else 

this._nstyle = TXT_TEXTBOX; 

if (state. _nRowCount 1= null) 

this,_nRowCount = Number (state. _nRowCount) ; 

else 

this._nRowcount = 1; 

if (state, _nColumncount != null) 
this,_nColumnCount = 



else 



this .„ncolumncount = -1; 



if (state. _nMaxLength != null) 
this._nMaxLength = 



else 



this._nMaxLength = -1; 



if (state. value 1= null) 

this, value = state. value; 

else 

this. value = ' ' ; 



} 



r = true; 

^ } 

var newValue = Request . Form(this. name) + ''; 
if (newValue != 'undefined') 

this. value = newvalue; 
return r; 



function „TXT hasStateO 

{ 

if (this.maintainstate) 

return thi sPage . i sstatePersi sted(thi s . name) ; 
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return false; 

} 

// eventhandler for databinding . -.^^ 

function _TXT onrowenter(obj Recordset .strDataFi eld) 

^ this. value = objRecordset -fields.getvalueCstroataField) + 

} 

// eventhandler for databinding 

function _TXT onbef oreupdateCobj Recordset ,strDataFi eld; 

^ var txtvalue = this. value; 

if Ctypeof (txtvalue) != 'undefined ) 

objRecordset. fields. setValueCstroataField, txtvalue); 

} 

} // end of _TXT Prototype function 

</SCRIPT> 
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// Microsoft script Library<BR> 

// visual interoev 6.0 Textbox Object for dhtol<br> 

// copyright 1998 Microsoft Corporation, All Rights Reserved. <BR> 

// <B>Do not modify in design view. Switch to source view.</B><BR> 

// <SCRIPT> , . , . ^ 

f uncti on CreateTextbox(st rName , f uncim t , ob3 Parent) 

^ if Ctypeof (strName) 1= ^string' || strName == 

return nul 1 ; 

// constants 

TXT_TEXTBOX = 0; 
TXT_TEXTAREA = 1; 
TXT_PASSWORD = 2; 

var strTag = '<SPAN id="' + strName + '_span">*; 

strTag = strTag + '<INPUT type="text" name=" ' + strName + id="" strName 

+ ; 

-I ' StrTag = strTag + '</SPAN>' 

0 if CCtypeofCobj parent) == 'object') && (objParent != null)) 

B obj Parent. insertAdjacentHTMLC'BeforeEnd' , strTag) ; 

O else . . ^ 

S document .write(strTag) ; 

//append public members 

3 var obiTextbox - ^XT createMembers (strName) ; 

fi if (CtypeofCobjTextbox) != 'object*) || (ob3Textbox null)) 

return null ; 

3 TVevents 

H txt„onchange = 'onchange'; 

//private members 
^ objTextbox.„obqEventManager = null; 

3 objTextbox.„objDataSource null; 

^ objTextbox._strDataField = 

objTextbox.„nRowCount = 1; 

objTextbox._nStyle = TXT_TEXTBOX; 

// advise for default eventhandlers 
objTextbox.^objEventManager = createEventManagerO; 

ob3Textbox._fireEventC_TXT_onbeforefuncimt(' + obiTextbox. id + ) ), 
objTextbox._fi reEventCfunclnit) ; 
return objTextbox; 

} 

function _TXT_createMembers (strName) 

^ var objparentspan = document. all [strName + "„SPAN']; 

var objTextbox = objParentspan.children(O) ; 
if (typeof (objTextbox) != "object') 
return null ; 

// ensure strName is defined in global namespace -..^H^-Fn n^^" ' ^ ii 

var boefineAsGlobal = eval ('typeof (' + strName + ') undefined ) M 

typeof (objparentspan. _makeglobal) != 'undefined'; 

if (bDefineAsGlobal) . n . t 

{ // scoped within a form, define in global namespace 

eval (StrName + ' = objTextbox'); 
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objParentspan.^makeglobal = 1; 

} 

objTextbox.hide = _TXT„hide; 
objTextbox.show = „TXT_show; 
objTextbox.isVisible = _TXT_isVisible; 
objTextbox.getColumnCount = _TXT_getColumnCount ; 
objxextbox.setColumnCount = _TXT_setColumnCount ; 
obiTextbox.getRowcount = _TXT_getRowCount ; 
objTextbox.setRowCount = _TXT_setRowCount ; 
obiTextbox.getMaxLength = _TXT_getMaxLength; 
obDTextbox.setMaxLength = _TXT_setMaxLength; 
objTextbox.getDataSource = „TXT„getDataSource; 
objTextbox.setDataSource = _TXT_setDataSource ; 
obiTextbox.getDataField = _TXT_getDataField; 
objTextbox.setDataField = „TXT_setDataFi eld; 
objTextbox.getStyle = _TXT_getstyle; 
objTextbox.setStyle = _TXT_setStyle; 
objTextbox. advise = _TXT_advise; 

objTextbox.adviseDefaultHandler = _TXT„advi5eDefaultHandl€ 
objTextbox. unadvise = „TXT_unadvise; 
objTextbox. display = „TXT_di splay; 
obiTextbox._fireEvent = _TXT_fi reEvent ; 
objTextbox.onbeforeupdate = _TXT_onbeforeupdate; 
objTextbox.„objSpan = eval (strName + '_SPAN ); 
return objTextbox; 



function „TXT_hide() , 

{ this -Style, visibility = hidden ; J- 

fbnction .rrxT_show() . . .,n , 

{ This. style. visibility = 'visible ; } 

function _TXT„isvi si bleO , 

{ return (this. style. visibility != hidden j; i 

function __TXT_getCol umnCountQ 

^ if Cthis._nstyle == txt^textarea) 

return this. cols; 

else 

return this. size; 

} 

f uncti on _TXT_setCol umncount (nCol umncount) 

^ if (lisNaNCparseintCnCol umncount)) && ncolumncount > 0) 

^ if (this._nstyle = 

this. cols 

else ... 

this. size = Number (nCol umnCount) ; 

return true; 
return false; 

} 

function „TXT_getRowCountO 
{ return this._nRowCount; } 

function _TXT_setRowCountCnRowCount) 
{ 



TXT^TEXTAREA) 

Number (nCol umncount) ; 
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TEXTBOX.HTM 

if (!isNaN(parseintCnRowcount)) && nRowcount > 0) 

this.„nRowCount = nRowcount; 

if Cthis._nstyle == txt_textarea) 

this, rows = Number(nRowcount) ; 
return true; 

} 

return false; 



} 



function _TXT_getMaxLength() 

if (this._.nstyle == txt_textarea) 
return this. cols; 

else 

return this.maxLength; 

} 

function _TXT_setMaxLength(nMaxLength) 

; if C!isNaN(parselntCnMaxLength)) && nMaxLength > 1 && this._nstyle != 

='txt_textarea) 

i { 

I this.maxLength = nMaxLength; 

^ return true; 

4 } 

return false; 

n 

function _TXT_getDatasourceC) 

{' " jrCturn this._objDataSource; } 

f uncti on „TXT_setDat asou rce (ob j Datasou rce) 

if (typeof (objDataSource) != 'object') 
return false; 

if (Cthis.^objDataSource 1= null) && Cthis._strDataField != ' ')) 

i f (thi s . _ob j Datasou rce . i sDHTMLAware () ) 

this.dataSrc = ' ' ; 
this.dataFld = " ; 



} 

else 
{ 



} 

} 



thi s ..objDataSource . unadvi se(thi s .^rowEnteriD) ; 
thi s ._obj Datasou rce . unadvi seCthi s ._rowExi tiD) ; 



if C(this.„objDataSource == null) || (objDataSource != null && 
this._objDataSource.id != objDataSource. id)) 

if (this._objDataSource I- null) 

thi s ._obj Datasou rce . unadvi seCthi s ,_afterOpenlD) ; 
if (ObjDataSource 1= null) 

this._afterOpenlD = objDataSource. ad vise(RS_ONAFTEROPEN, 
this. id + ' ,setDataSource(' + objDataSource. id + ');'); 
} 

this._objDataSource = objDataSource; 
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if CCobjDataSource != null) && Cthis,_strDataFie1d \= ")) 

i f CobjDataSource . i sDHTMLAwareO) 

this.datasrc = + objDataSource,getDHTMLDataSourcelD() ; 
this.dataFld = this._strDataField; 

} 

else 

this._.rowEnterID = objDatasource.advise(RS_ONROWENTER, 

'_TXT onrowenterC + obiDataSource. id + ' + this.id + + thi s ._strDataField 

+ 

this._rowExitlD = objDataSource.adviseCRS_ONROWEXiT, 
"_TXT_onrowexitC + objDatasource.id + ' + this. id + + this._strDataField + 

*");•); 

} 

} 

return true; 

} 

3f unction ^TXl^getDataFieldC) 

CK return this._strDataField; } 

J}f uncti on ^XT_setDataFi el d (st roataFi el d) 

0 if (Cthis._objDataSource != null) && (this.^strDataField != ")) 

.H { 

3 if Cthis.„objDataSource.isDHTMLAware()) 

this.datasrc = ' ' ; 
- ' - this.dataFld = " ; 



} 

else 
{ 



} 



thi s ._objDataSource . unadvi se (thi s ._rowEnterlD) ; 
thi s ._objDataSource . unadvi seCthi s ._rowExi tiD) ; 



I y 

this.„strDataField = strDataField; 

if ((this._objDataSource != null) && (this. .strDataField != '')) 

if (t hi s._objDatasource.i SDHTMLAwareO) 

this.datasrc = + 
this ._objDataSource.getDHTMLDataSourceIDC) ; 

this.dataFld = strDataField; 

} 

else 

this._rowEnterlD = this._objDatasource.adviseCRS_ONROWENTER, 
■„TXT_onrowenter(* + this._objDataSource.id + ' + this. id strDataField 
+ '");'); 

this._rowExitlD = this._objDataSource.advise(RS_ONROWEXiT, 
'„TXT_onrowexit(' + this.„objDataSource.id + \ ' + this. id + + strDataField 

+ '");'); 

} 

} 

return true; 

} 
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function _TXT_getstyleO 

{ return this._nstyle; } 

function _TXT_setStyleCn5tyle) 

^ if (MsNaNCparseintCnStyle)) && (nstyle >- txt_textbox) && (nstyle <= 

TXT_P AS SWORD)) 

^ if Cthis._nStyle != nstyle) 

{ // type of tag needs to be changed 

// save current state 
var bvisible = this.isVisibleQ ; 
var bDisabled = this, disabled; 
var value = this, value; 
var strName = this. name; 
var nRowCount = thi s .getRowCountC) ; 
var ncol count = this.getColumnCountC) ; 
var nMaxLength = this.getMaxLengthC) ; 
var objEventManager = this._objEventManager ; 
var objDataSource = this._objDataSource; 
var strDataField = this._strDataField; 

// replace previous tag with new tag 
I var strTag; 

if (nstyle = txt_textarea) .-^ ^ 

StrTag = '<textarea name= ' + strName + id= + 
StrName + rows-' + nRowCount + ' style="visiblity:hidden"></TEXTAREA>' ; 

else if (nstyle == TXT.Password) 

var StrTag = '<INPUT type-"password name- + 
StrName + id="' + strName + style="visiblity:hidden">' ; 

el se 

: ^ var StrTag = '<input type="text" name-"' + strName 

id="''-+ StrName + style-"visiblity:hidden">' ; 

this,_objSpan,innerHTML = strTag; 

// restore previous state 

var obiTextbox - _TXT createMembers(strName) ; 

if ((typeof(objTextbox) != 'object') I I (obj Text box — 

return false; 

objTextbox.^nStyle = nStyle; 
objTextbox. value = value; 
objTextbox. disabled = bDisabled; 
objTextbox. setRowCount(nRowcount) ; 
objTextbox . setcol umncount (nCol count) ; 
objTextbox, setMaxLength(nMaxLength) ; 
objTextbox. setDataSource(objDataSource) ; 
objTextbox . setDataFi el d (st roataFi el d) ; 
if (bvisible) objTextbox. showO ; 

objTextbox. _objEventManager = objEventManager; 

if (objEventManager != null) 

{ //re-attach all event handlers 

var nEvents = objEventManager .getEventCountO ; 
for (var i-0; i < nEvents; i++) 
eval ('objTextbox. ' + 
objEventManager.getEvent(i) + ' = _TXT — fi reEvent ; ' ) ; 

} 

return true; 
return false; 
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} 

f uncti on _TXT_advi se (st rEvent , f uncTocal 1 ) 

var nAdviselD = this._objEventManager.adviseCstrEvent ,funcToCan) ; 
if (nAdviselD != -1) 

evalC'this.* + st rEvent + ' = _TXT fi reEvent ; ') ; 

return nAdviselD; 

} 

function _TXT_adviseDefaultHandlerCstrName,st rEvent) 
{ 

var nAdviselD = 

t hi s . _ob j EventManager . advi seDef aul tHandl e r (st rName , st rEvent) ; 
if (nAdviselD != -1) 

evalC'this." + strEvent + " = „TXT_fireEvent;") ; 

} 

function _TXT_unadvise (strEvent, nAdviselD) 

{ retu rn thi s . _ob j EventManager . unadvi se (st rEvent , nAdvi seiD) ; } 

3 function _TXT_display() 

J{ } 

■^function _TXT fi reEvent(funcToFi re) 

if (typeof (funcToFi re) === 'undefined') 

if (thi s .„obj EventManager != null) 

this._objEventManager.fi reEventC on' + wi ndow. event .type) ; 

•trlse 

_EM f i reEvent(f uncToFi re) ; 

} 

f uncti on _TXT onrowente r (obi Recordset , obqTextbox , st roataPi el d) 

{ objTextbox. value = objRecordset.fi el ds.getValue(strDataFi eld) + ''; } 

f uncti on _TXT on rowexi t (ob j Recordset , objTextbox , st rDataFi el d) 

{ 

var txtvalue = objTextbox. value; 

if (typeof (txtvalue) i= 'undefined') 

ob j Recordset . f i el ds . setval ue (st rDataFi el d , txtval ue) ; 



function _TXT_onbeforeupdate() 
{ 

var objTextbox = wi ndow. event .srcElement; 

if (objTextbox. _objDataSource 1= null && objTextbox. „st rDataFi eld 1= *') 

if (typeof (objTextbox objDataSource._rsRDS) 1= 'undefined') 

var fieldType = 

objTextbox. „objDataSource._rsRDS. recordset. Fields (objTextbox. _strDataFi eld) .type; 

//adDate, adDBDate, adDBTime, adDBTi mestamp 

if ((fieldType ==7) || (fieldType == 133) || (fieldType = 

134) II (fieldType == 135)) 

if (!isNaN(Date.parse(objTextbox. value))) 

objTextbox ._objDataSource . f i el ds . setval ue(objTextbox .„st rDataFi el d , 
objTextbox. value) ; 
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} 

} 

function „TXT_onbeforefunci nitCobjTextbox) ... ^ . 

{ objTextbox.adviseDefaultHandlerCobjTextbox.id, txt_onchange) ; } 
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ADOUTILS.ASP 

vti„encodi ng : SR 1 utf 8-n1 

vti .author : SR | WATS-AURORA\\sachi n 

vti_cached1 i nki nf o : vx | 

vti_cachedhastheme : BR | f al se 

vti_cachedhasborder : BR | f al se 

vti_timecreated:TR|04 Apr 2000 12:24:01 -0500 

vti_filesize:IX|4388 

vti _modi f i edby : SR I WATS-AURORA\\Sachi n 

vti.cacheddtm:TX|04 Apr 2000 12:24:01 -0500 

vti_„backl i nki nf o : vx | 

vti_cachedhasbots : BR | f al se 

vti__extenderversi on : SR | 3 . 0 , 2 . 1105 

vti„timelastmodified:TR|04 Apr 2000 12:24:01 -0500 
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BUTTON. ASP 

vti_encodi ng : SR | utf 8-nl 

vti ^author : SR | WATS-AURORA\\Sachi n 

vti ^cached! i nki nf o : VX 

vti_cachedhastheme;BR false 

vti_cachedhasborder : BR | f al se 

vti_timecreated:TRl04 Apr 2000 12:24:01 -0500 

vti _f i 1 esi ze : ix | 6139 

vti^modi f i edby : SR 1 WATS-AURORA\\Sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:01 -0500 

vti„backl i nki nf o : VX | 

vti_cachedhasbots : BR | f al se 

vti_extenderversi on : SR | 3 . 0 . 2 . 1105 

vti_timelastmodified:TR|04 Apr 2000 12:24:01 -0500 
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BUTTON . HTM 

vti_encocling:SR| utf8-nl 

vti _author ; SR | WATS-AURORA\\Sachi n 

vti^cachedl i n ki nf o : VX | 

vti^cachedhastheme : BR j f al se 

vti_cachedhasborder : BR | f al se 

vti_timecreated:TR|04 Apr 2000 12:24:01 -0500 

vti_filesize:ix| 5274 

vti _modi f i edby : SR | WATS-AURORA\\Sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:01 -0500 

vti _bac kl i n ki nf o : vx | 

vti_cachedhasbots : BR | f al se 

vti_extenderversi on : SR | 3 . 0 . 2 . 1105 

vti_timelastmodified:TRl04 Apr 2000 12:24:01 -0500 
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CHECKBOX. ASP 

vti_encoding:SR| utf8-nl 

vti_author : SR I WATS-AURORA\\sachi n 

vti_cachedl 1 nki nf o : vx | 

vti_cacheclhastheme : br | f a1 se 

vti_cachedhasborder:BR| false 

vti_.timecreated:TRl04 Apr 2000 12:24:01 -0500 

vti„filesize:IX|6723 

vti „modi f i edby : SR | WATS-AURORA\\Sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:01 -0500 

vti_backl i nki nf o : VX | 

vti_cachedhasbots : BR | f aT se 

vti_extenderversi on : SR | 3 . 0 , 2 . 1105 

vti„timelastmodified:TR|04 Apr 2000 12:24:01 -0500 
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vti _encodi ng : SR | utf 8-n1 

vti„author : SR | WATS-AURORA\\sachi n 

vti^cachedl i nki nf o : VX | 

vti„cachedhastheme : BR | f a"! se 

vti_cachedhasborder : BR | f al se 

vti_timecreated:TRl04 Apr 2000 12:24:02 -0500 

vti _f i 1 esi ze : IX | 7279 

vti _modi f i edby : SR | WATS-AURORA\\Sachi n 

vti^cacheddtm:TX|04 Apr 2000 12:24:02 -0500 

vti „backl i nki nf o : VX | 

vti_cachedhasbots : BR | f al se 

vti„extenderversion : SR I 3 . 0. 2 , 1105 

vti_timelastmodified:TR|04 Apr 2000 12:24:02 -0500 
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DATAGRID.ASP 

vti_encodi ng : SR | utf 8-nl 

vti^author : SR 1 WATS-AURORA\\Sachi n 

vti„cachedl i n k1 nf o : VX | 

vti^cachedhastheme : BR | f al se 

vti_cachedhasborder: BR| fal se 

vti_timecreated:TR|04 Apr 2000 12:24:02 -0500 

vti „f i 1 esi ze : IX 1 12259 

vti _modi f i edby : SR 1 WATS-AURORA\\Sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:02 -0500 

vti _backl i nki nf o : VX | 

vti_cachedhasbots : br 1 fal se 

vti_extenderversi on : SR | 3 - 0 . 2 . 1105 

vti_timelasttnodified:TR|04 Apr 2000 12:24:02 -0500 
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vti_encodi ng : SR | utf 8-nT 

vti_author : SR | WATS-AURORA\\sachi n 

vti_cachedl 1 nki nf o : vx | 

vti _cachedhastherrie : BR I f al se 

vti_cachedhasborder : BR | fal se 

vti„timecreated:TR|04 Apr 2000 12:24:02 -0500 

vti_f i 1 esi ze : IX 1 16764 

vt i _modi f i edby : SR | WATS-AURORA\\sachi n 

vti_cacheddtm:TXl04 Apr 2000 12:24:02 -0500 

vti _backl i nki nf o : vx | 

vti_cachedhasbots : BR | fal se 

vti_extenderversion : SR | 3 . 0 . 2 . 1105 

vti„timelastmodified:TR|04 Apr 2000 12:24:02 -0500 
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EVENTMGR.ASP 

vti„encodi ng : SR | utf 8-nT 

vti _author : SR | WATS-AURORA\\Sachi n 

vti„cachecn i nki nfo : vx 

vti_cachedhastheme:BR false 

vti„cachedhasborder: BR | f al se 

vti„timecreated:TR|04 Apr 2000 12:24:03 -0500 

vti_f i 1 esi ze : IX 1 446 

vti_modi f i edby : SR I WATS-AURORA\\Sachi n 

vti_cacheddtm:TXl04 Apr 2000 12:24:03 -0500 

vti _backl i nki nfo : VX | 

vti_cachedhasbots : BR | f al se 

vti^extenderversioniSRt 3.0.2.1105 

vti„timelastmodified:TR|04 Apr 2000 12:24:03 -0500 
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EVENTMGR.HTM 

vti„encodi ng : SR I utf 8-n1 

vti_author : 5R | WATS-AURORA\\Sachi n 

vti_cachedl i nk1 nfo : vx | 

vti_cachedhastheme : BR | f al se 

vti_cachedha5border : BR | f al se 

vti_timGcreatGd:TR|04 Apr 2000 12:24:03 -0500 

vti_f i 1 esi ze : IX 1 4699 

vti_modi f i edby : SR | WATS-AURORA\\Sachi n 

vti„cacheddtm:TX|04 Apr 2000 12:24:03 -0500 

vt i „backl i n ki nfo : VX | 

vti _cachedhasbots : BR | f al se 

vti _extenderver si on : SR | 3 . 0 . 2 . 1105 

vti_timelastmodified:TRl04 Apr 2000 12:24:03 -0500 
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LABEL. ASP 

vti_encodi ng : SR | utf 8-nl 

vti_author : SR I WATS-AUR0RA\\5achi n 

vti„cachedl i nki nf o : vx 1 

vti„cachedhastheme : br | f al se 

vti„cachedhasborder : BR I f a1 se 

vti_timecreated:TR|04 Apr 2000 12:24:04 -0500 

vti_filesize:IX|5438 

vti_modi f i edby : SR | WATS-AURORA\\Sachi n 

vti„cacheddtm:TX|04 Apr 2000 12:24:04 -0500 

vti _backl i n ki nf o : vx | 

vti_cachedhasbots : BR | f al se 

vti„extenderversi on : SR | 3 . 0 . 2 . 1105 

vti„timelastmodified:TR|04 Apr 2000 12:24:04 -0500 
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LABEL.HTM 

vti_encodi ng : SR | utf 8-n1 

vti_author : SR 1 WATS-AURORA\\Sachi n 

vti^cachedl i nki nf o : vx | 

vti_cachedhastheme : BR 1 f al se 

vti_cachedhasborder : BR| fal se 

vti_timecreated:TRl04 Apr 2000 12:24:04 -0500 

vti„filesize:ixl 5600 

vti _modi f i edby : SR | WATS-AURORA\\Sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:04 -0500 

vti _backl i nki nf o : vx | 

vti_cachedhasbots : BR 1 f al se 

vti„extenderversi on : SR I 3 . 0 . 2 . 1105 

vti timelastmodified:TR|04 Apr 2000 12:24:04 -0500 
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LISTBOX.ASP 

vti_encodi ng : SR 1 utf 8-n1 

vti_author : SR | WATS-AURORA\\Sachi n 

vti^cachedl i nki nf o : VX 1 

vti _cachedhas theme : BR t f al se 

vti_cachedhasborder : BR ! f al se 

vti„timecreated:TR|04 Apr 2000 12:24:04 -0500 

vti_f i 1 esi ze : IX 1 11391 

vti^modi f i edby : SR | WATS-AURORA\\Sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:04 -0500 

vti _backl i nki nf o : vx | 

vti^cachedhasbots : BR | f al se 

vti_extenderversion : SR | 3 . 0 . 2 . 1105 

vti„timelastmodified:TR|04 Apr 2000 12:24:04 -0500 
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LISTBOX.HTM 

vti_encodi ng : SR | utf 8-ri1 

vti_author : SR | WAT5-AUR0RA\\sachi n 

vti _cachecn i nki nf o : vx | 

vti_cachedhastheme : BR | f al se 

vti__cachedhasborder : BR | f al se 

vti_timecreated:TR|04 Apr 2000 12:24:05 -0500 

vti_filesi2e:ix|9513 

vt i _modi f i edby : SR I WATS-AURORA\\sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:05 -0500 

vti_.backl i nki nf o : vx I 

vti_cachedhasbots : BR | f al se 

vti_extenderversi on : SR 1 3 . 0 . 2 . 1105 

vti timelastmodified:TR|04 Apr 2000 12:24:05 -0500 
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MISCUTILS.HTM 

vti„encodi ng : SR | utf 8-nl 

vti „autho r : SR I WATS - AURORA\\Sachi n 

vti_cachedl i nki nf o : VX | 

vti_cachedhastheme : BR | f a1 se 

vti_cachedhasborder : BR I f al se 

vti_timecreated:TR|04 Apr 2000 12:24:05 -0500 

vti.f i 1 esi ze : IX 1 2660 

vti _modi f i edby : SR | WATS-AURORA\\Sachi n 

vti„cacheddtm:TX|04 Apr 2000 12:24:05 -0500 

vti_backl i nki nf o : VX | 

vti„cachedhasbots : br | f al se 

vti_extenderversi on : SR | 3 . 0 . 2 . 1105 

vti„timelastmodified:TR|04 Apr 2000 12:24:05 -0500 
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Vtl 

vti 
vti 
vti 
vti 
vti 
vti 
vti 
vti 
vti 
vti 
vti 
vti 



OPTIONGRP.ASP 

_encodi ng : SR | utf 8-nl 

_autho r : SR I WATS-AURORA\\sachi n 

_cachecn i nki nf o : vx 

_cachedhastheme: BR false 

_cachedhasborcler : BR i f al se 

„timecreated:TR|04 Apr 2000 12:24:05 -0500 

_filesize:ix|12607 

_modi f i edby : SR I WATS-AURORA\\Sachi n 

_cacheddtm:TX|04 Apr 2000 12:24:05 -0500 

.back! i nki nfo:vxt 

_cachedhasbots : BR | f al se 

_extenderversi on : SR 1 3 . 0 . 2 . 1105 

_timelastmodified:TR|04 Apr 2000 12:24:05 -0500 
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OPTIONGRP.HTM 

vti„encocli ng : SR | utf 8-ril 

vti„author : SR | WATS-AURORA\\Sachi n 

vt i .cached! i nki nf o : VX | 

vti _cachedhas theme : BR | f al se 

vti „cachedhasborder : BR | f al se 

vti_timecreated:TRl04 Apr 2000 12:24:06 -0500 

vti _f i 1 esi ze : IX 1 14439 

vti _modi f i edby : SR | WATS-AURORA\\sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:06 -0500 

vti _backl i nki nf o : VX | 

vti_cachedhasbots : BR | f al se 

vti_extenderversion:SR| 3 .0.2. 1105 

vti_timelastmodified:TR|04 Apr 2000 12:24:06 -0500 
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Vtl 

vti 
vti 
vti 
vti 
vti 
vti 
vt 
vt 
vt 
vti 



_encodi ng : SR | utf 8-ril 
_autho r : SR I WATS-AURORA\\Sachi n 
„cachedl i nki nf o : vx 
_cachedhastheme : BR 



PM.ASP 



false 

„cachedhasborder : BR | f a1 se 
„timecreated:TRl04 Apr 2000 12:24:06 -0500 
„filesize:ix|28056 
_modi f i edby : SR | WAT5-AUR0RA\\sachi n 
_cacheddtm:TX|04 Apr 2000 12:24:06 -0500 
_backlinkinfo:VX| 

cachedhasbots : BR | f al se 

vti_extenderversi on : SR I 3 . 0 - 2 . 1105 
vti_timelastinodified:TRl04 Apr 2000 12:24:06 -0500 
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PM. JS 

vti_encodi ng : SR | utf 8-nl 
vti„author : SR 1 WATS-AURORA\\Sachi n 
vti„timecreated:TR|04 Apr 2000 12:24:07 -0500 
vti „modi f i edby : SR | WATS-AURORA\\Sachi n 
vti _backl i nki nf o : vx | 
vti_extenderversion : SR | 3 . 0. 2 . 1105 
vti„timelastmodified:TR|04 Apr 2000 12:24:07 -0500 



Page 1 



RECORDSET. ASP 

vti_encodi ng : SR | utf 8-nl 

vti_.author : SR | WATS-AURORA\\Sachi n 

vt1_cachecn i nki nf o : VX | 

vti _cachedhastheme : BR | f a1 se 

vti„cachedhasborder: BR| false 

vti_timecreated:TR|04 Apr 2000 12:24:07 -0500 

vti_f i 1 esi ze : IX 1 26842 

vti _modi f i edby : SR | WATS-AURORA\\Sachi n 

vti„cacheddtm:TX|04 Apr 2000 12:24:07 -0500 

vti_backl i nki nf o : VX | 

vti_cachedhasbots : BR | f al se 

vti _extenderve rsi on : SR I 3 . 0 . 2 . 1105 

vti_timelastmodified:TRl04 Apr 2000 12:24:07 -0500 
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vt 

vt 

vt 

vt 

vt 

vti 

vt 

vt 

vt 

vt 

vti 

vti 

vti 



RECORDSET.HTM 

„encodi ng : SR | utf 8-nT 

_author : SR | WATS-AURORA\\Sachi n 

_cachedl i nki nf o : vx 

„cachedhastheme:BR false 

_cachedhasborder : BR I f al se 

„timecreated:TR|04 Apr 2000 12:24:07 -0500 

„fi1esize:ix|15810 

_modi f i edby : SR 1 WATS-AURORA\\Sachi n 

_cacheddtm:TX|04 Apr 2000 12:24:07 -0500 

_back1inkinfo:VX| 

_cachGdhasbots : BR | f al se 

_extende rve rsi on : SR I 3 . 0 . 2 . 1105 

„timelastmodified:TR|04 Apr 2000 12:24:07 -0500 
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_encodi ng : SR | utf 8-nT 
„author : SR | WATS-AURORA\\Sachi n 
cached! i nki nf o : vx | 



RS.ASP 



vti 
vti 

vti_cachedhastheme ; br | f al se 
vti 
vti 
vti 
vti 
vti 
vti 
vti 
vti 
vti 



_cachedhas border : BR | f al se 
_timecreated:TR|04 Apr 2000 12:24:08 -0500 
_filesize: IX 110043 
_modi f i edby : SR | WATS-AUR0RA\\5achi n 
_cacheddtm:TX|04 Apr 2000 12:24:08 -0500 
_backlinkinfo:VX| 
_cachedhasbots : br | f al se 
„extenderversi on : SR | 3 . 0 . 2 . 1105 
„timelastmodified:TR|04 Apr 2000 12:24:08 -0500 
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RS.HTM 

vti_encodi ng : SR | utf 8-nl 

vti .author : SR | WATS-AURORA\\Sachi n 

vti_cachedl i nki nf o : VX 

vti_cachedhastheme:BR false 

vti„cachedhasborder : BR | f al se 

vti_timecreated:TR|04 Apr 2000 12:24:08 -0500 

vti„f i 1 esi ze : IX 1 16411 

vti_modi f i edby : SR | WATS-AURORA\\Sachi n 

vti„cacheddtm:TX|04 Apr 2000 12:24:08 -0500 

vti_backlinkinfo:VX| 

vti_cachedhasbots : BR | f al se 

vti„extenderversi on : SR 1 3 . 0 . 2 . 1105 

vti_timelastmodified:TR|04 Apr 2000 12:24:08 -0500 
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RSNAVBAR.ASP 

vti_encodi ng : SR | utf 8-nl 

vti_author : SR| WATS-AURORA\\Sachi n 

vti_cachecn i nki nf o : VX 

vti_cachedhastheme:BR false 

vti„cachedhasborder : BR 1 f al se 

vti„timecreated:TR|04 Apr 2000 12:24:08 -0500 

vti_f i 1 esi ze : IX 1 11644 

vti_modi f i edby : SR i WATS-AURORA\\Sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:08 -0500 

vti_backlinkinfo:vx| 

vti„cachedhasbots : BR | f al se 

vti_extenderversi on : SR 1 3 . 0 . 2 . 1105 

vti_timelastmodified:TR|04 Apr 2000 12:24:08 -0500 
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R5NAVBAR.HTM 

vti_encoding:SR| utf8-nl 

vti_author : SR 1 WATS-AURORA\\Sachi n 

vti_.cachecn i nki nf o : vx | 

vti_cachedhastheme : BR | f al se 

vti_cachedhasborder : BR 1 f al se 

vti_timecreated:TR|04 Apr 2000 12:24:09 -0500 

vti_f i 1 esi ze : IX 1 10616 

vti^modi f i edby : SR | WATS-AURORA\\Sachi n 

vti„cacheddtm:TX|04 Apr 2000 12:24:09 -0500 

vti„backlinkinfo:vx| 

vti_cachedhasbots : BR | f al se 

vti_ext enderversi on : SR 1 3 . 0 . 2 . 1105 

vti_timelastmodified:TR|04 Apr 2000 12:24:09 -0500 
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RSPROXY, CLASS 

vti^encodi ng : SR | utf 8-nl 
vti_author : SR | WATS-AURORA\\Sachi n 
vti„timecreated:TRi04 Apr 2000 12:24:09 -0500 
vti_modi f i edby : SR | WATS-AURORA\\Sachi n 
vti_backl i nki nf o : vx | 
vti_extenderversi on : SR 1 3 , 0 . 2 . 1105 
vti_timela5tmodified:TR|04 Apr 2000 12:24:09 -0500 
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RSPROXY.JAVA 

vti_encodi ng : SR | utf 8-nl 
vti_author : SR | WATS-AURORA\\Sachi n 
vti_timecreated:TR|04 Apr 2000 12:24:09 -0500 
vti _modi f i edby : SR | WATS-AURORA\\Sachi n 
vt i _backl i n ki nf o : vx | 
vti_extenderversi on : SR | 3 . 0 . 2 . 1105 
vti_timelastmodified:TR|04 Apr 2000 12:24:09 -0500 
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TEXTBOX.ASP 

vti _encodi ng : SR | utf 8-nl 

vti „author : SR | WATS-AURORA\\Sachi n 

vti_cachedlinkinfo:vx| 

vti„cachedhastheme : BR | f al se 

vti_cachedhasborder : BR | f al se 

vti_timecreated:TRl04 Apr 2000 12:24:10 -0500 

vti_filesize:IX|8954 

vti __modi f i edby : SR I WATS-AURORA\\Sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:10 -0500 

vti_backl i nki nf o : VX | 

vti_cachedhasbots : BR i f al se 

vti_extenderversi on : SR 1 3 . 0 . 2 . 1105 

vti_timelastmodified:TR|04 Apr 2000 12:24:10 -0500 
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TEXTBOX.HTM 

vti_encodi ng : SR | utf 8-nl 

vti.author : SR | WATS-AURORA\\Sachi n 

vti__cachedl i nki nf o : vx | 

vti^cachedhastheme : BR 1 f al se 

vti_cachedhasborder : BR | f al se 

vti„timecreated:TR|04 Apr 2000 12:24:10 -0500 

vti_filesize:IX|10772 

vti _modi f i edby : SR | WATS-AURORA\\sachi n 

vti_cacheddtm:TX|04 Apr 2000 12:24:10 -0500 

vti _backl i nki nf o : vx | 

vti _cachedhasbot s : BR | f al se 

vti _extenderversi on ; SR I 3 . 0 . 2 . 1105 

vti„timelastmodified:TR|04 Apr 2000 12:24:10 -0500 
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VERSION 

vti_encodi ng : SR | utf 8-nl 
vti_author : SR | WATS-AURORA\\Sachi n 
vti„timecreated:TR|04 Apr 2000 12:24:10 -0500 
vti_modi f i edby : SR | WATS-AURORA\\Sachi n 
vti_backl i nki nf o : vx | 
vti_extenderversi on : SR 1 3 . 0 . 2 . 1105 
vti_timelastmodified:TR|04 Apr 2000 12:24:10 -0500 
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mine. htm 

<html> 
<head> 

<title>Flash Tutorial</ti tle> 
</head> 

<body bqcolor="#FFffff" leftmargin="0" topmargin="0"> 
<table width="600" border="0" censpacing="0" cenpadding="0"> 
<tr> 
<td> 

<object classid="clsid:D27CDB6E-AE6D-llcf-96B8-4445535400pO" , , ^, , u^. ^ ^ 
codebase=" http : //down! oad . mac romedi a . com/pub/shockwave/cabs/f 1 ash/swf 1 ash , cab#3 ,0,0, 
0" width="600^ height="400" viewastext id="shockwaveFlashl"> 

<param name="SRC" value-". ./f las/tutor. swf"> 

<embed s rc=" tutor. swf" 
pi uqi nspage="http : //www . macromedi a . com/shockwave/downl oad/ 
type="appTication/x-shockwave-flash" width="600" height="400"> 

</object> 

</td> 
</tr> 

<tr align="center"> . , , , , 

<td><a href="javascript:window.close()">Close wi ndow</a></td> 

</tr> 
</table> 
</body> 
</html> 
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tutflash.htm 

<html> 
<head> 

<title>Flash Tutorial</ti tle> 
</head> 

<body bgcolor="#FFffff" leftmargin="0" topmargin="0"> 
<table width="600" border="0" cellspacing^^O" cenpadding="0"> 
<tr> 
<td> 

<object classid="clsid:D27CDB6E-AE6D-llcf-96B8-444553540000" 

codebase=" http : //down! oad , macromedi a . com/pub/shockwave/cabs/f 1 ash/ swf 1 ash . cab#3 ,0,0, 
0" width="600" height="400" VIEWASTEXT id=:ShockwaveFlashl> 

<param name="SRC" value=" . ./flas/eyard.swf"> 

<embed src=". ./flas/eyard.swf" 
pi uqi nspaqe=" http : //www . macromedi a . com/shockwave/downl oad/" 
type="appTication/x-shockwave-flash" width="600" height="400"> 

</object> 

</td> 
</tr> 

<tr align="center"> 

<td><a href=" javascri pt : wi ndow. cl ose() ">cl ose wi ndow</a></td> 

</tr> 
</tabl e> 
</body> 
</html> 
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tutor. swf 
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tutor. swf 
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0 #-D /intro -n D a@-D 0 #- 
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eyard.swf 

vti_encodi ng : SR | utf 8-n1 
vti_author : SR | WATS-AURORA\\Sachi n 
vti_timecreated:TR|05 Jul 2000 00:25:45 -0500 
vti_modi f i edby : SR I WATS-AURORA\\Sachi n 
vti_backl i nki nf 0 : vx I 
vti_extenderversi on : SR 1 3 . 0 . 2 . 1105 
vti_timelastmodified:TR|05 Jul 2000 00:25:45 -0500 



o 

Hi 

CO 
u1 

o 

^0 - 

a 

□ 

y 

o 

u 



Page 1 



mine. htm 

vti_encodi ng : SR i utf 8-nl 
vti_author : SR | WATS-AURORA\\Sachi n 
vti_title:SR| Flash Tutorial 

vti.cachedl i nki nf o : VX | D | cl si d : D27CDB5E-AE6D-llcf -96B8-444553540000 

D I http : //downl oad . macromedi a . com/pub/shockwave/cabs/f 1 ash/swf 1 ash .cab Si tutor 

H I i avascr i pt : wi ndow . cl ose Q 

vti^cachedhastheme : BR | f al se 

vti _cachedhasborde r : BR | f al se 

vti_timecreated:TR|27 Sep 2000 11:15:52 -0500 

vti__filesize:IX|783 . „^„ 

vti„cachedbodystyle:SR|<body bgcolor="#FFffff " leftmargin-"0" topmargin= 0 > 
vti _backl i nki nf o : vx | 

vti_cacheddtm:TX|12 Dan 2001 21:11:30 -0600 
vti_cachedhasbots : BR | f al se 

vti_nexttolasttimemodified:TW|27 Sep 2000 10:15:46 -0500 
vti_extenderversi on : SR 1 3 . 0 . 2 . 1105 
vti _cachedti tl e : SR 1 Fl ash Tutori al 
vti_timelastmodified:TR|12 Jan 2001 21:11:30 -0600 
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tutflash.htm 

vti_encoding:SR| utf8-nl 

vti .author : SR | WATS-AURORA\\Sachi n 

vti„title:SR| Flash Tutorial 

vti _cachedl i nki nf o : VX | D 1 cl si d : D27CDB6E-AE6D-llcf -96B8-4445 5 3 540000 
D I http : //downl oad . macromedi a . com/pub/shockwave/cabs/f 1 ash/swf 1 ash . cab 
s| . ./flas/eyard.swf H javascript :window.closeO 
vti„cachedhastheme:BR false 
vti„cachedhasborder : BR | f al se 
vti_timecreated:TR|22 Jun 2000 11:29:19 -0500 

vtilSchedbodys^^ bgcolor="#FFffff" leftmargin="0" topmargin="0"> 

vti _backl i n ki nf o : vx 1 

vti_cacheddtm:TX|12 Dan 2001 21:11:31 -0600 
vti_cachedhasbots : BR | f al se 

vti„nexttolasttimemodified:TW|14 Dul 2000 15:47:56 -0500 

vti_extenderversi on : SR 1 3 . 0 . 2 . 1105 

vti_cachedti tl e : SR | Fl ash Tutori al 

vti timelastmodified:TR|12 Dan 2001 21:11:31 -0600 
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tutor. swf 

vti„encodi ng : SR | utf 8-nl 
vti_.author : SR 1 WATS-AURORA\\Sachi n 
vti_timecreated:TR|27 Sep 2000 11:16:21 -0500 
vti„modi f i edby : SR I WATS-AURORA\\Sachi n 
vti_backl i nki nf o : vx | f 1 as/mi ne . htm 
vti_extenderversi on : SR 1 3 . 0 . 2 , 1105 
vti„time1astmodified:TR|27 Sep 2000 11:16:21 -0500 
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express.htm 

<FONT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

1. </F0NT></B> <FONT size=l>open Microsoft outlook 
Express </FONT><BR> 

<FONT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

2. </F0NT></B> <FONT si ze=l>Sel ect the File / Export / 
Address Book ... Menu option </font><br> 

<FONT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

3. </F0NT></B> <FONT si ze=l>Sel ect "Text File (Comma 
Separated Value)" and press Export </font><br> 

<FONT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
col or=#092186> STEP 

4. </F0NT></B> <F0NT size=l>Name the file and click 
Next. </FONT><BR> 

<FONT face="verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

5. </F0NT></B> <FONT size=l>Click Finish </FONT><BR> 

<FONT face="Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

6. </F0NT></B> <FONT size=l>Go to&nbsp ; Emai 1 List page 
of eyardsigns.com </FONT><br> 

<FONT face="Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

7. </F0NT></B> <F0NT size=l>Find the "import from 

Outlook Express" section, select the CSV file you just created (if it is not 
listed in the folder you saved the file to, make sure "Files of type" pulldown 
in the Open window is set to "All Files"), and choose "import Now" to import 
your outlook Express addresses to your Evite.com account</FONT><BR> 
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netscape.htm 

<FONT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

1. </F0NT></B> <FONT si2e=l>0pen Your Netscape Mail 

</FONT><BR> 

<FONT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
col or=#092186> STEP 

2. </F0NT></B> <FONT si ze=l>Sel ect the File / 
Export... Menu option </FONT><BR> 

<FONT face="verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

3. </F0NT></B> <FONT size=l>in the "Save as type" 

choice menu, select "Comma Separated (*.csv) </font><br> 
<FONT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
col or=#092 18 6>STEP 

4. </F0NT></B> <FONT size=l>ln the box enter "Netscape 
addresses" </FONT><BR> 

<FONT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

5. </F0NT></B> <FONT size=l>Enter a convenient file 
location in the box "file name" </font><br> 

<FONT face="Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
col or=#092186>STEP 

6. </font></b> <font size=l>click save </font><br> 

<FONT face="verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

7. </font></b> <font size=l>Go to  Email List page of 
eyardsigns.com </font><br> 

<FONT face="verdana, Arial, Helvetica, sans-serif" size=2><8><FONT 
col or=#092186>STEP 

8. </F0NT></B> <FONT size=l>Find the "Import from 

Netscape" section, select the CSV file you just created (if it is not listed m 
the folder you saved the file to, make sure "Files of type" pulldown in the Open 
Window is set to "All Files"), and choose "import Now" to import your Netscape 
addresses to your eyardsigns.com account. </FONT> 
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outlook.htm 

<FONT face="Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
co1or=#092l86>STEP 1.</F0NT> </B><FONT size=l>open Microsoft 
OUtl O0k</FONT></FONT><BR> 

<FONT face:="verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

2. </F0NT> </B><FONT si ze=l>Sel ect the File / Import and Export... Menu option 

< / FONTx/ FONTx BR> 

<FONT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
col or=#092186> STEP 

3. </F0NT></B> <FONT si ze=l>Sel ect "Export to a file" and click Next 
</ FONTx/ FONTx B R> 

<FONT 

face=" Verdana, Arial, Helvetica, sans-serif" 5ize=2xB><FONT color=#092186>STEP 

4. </F0NTx/BxF0NT size=l> Select your Contacts folder and click Next (outlook 
98 users, perform step 5 first) </fontx/fontxbr> 

<F0NT 

face=" Verdana, Arial, Helvetica, sans-serif" size=2xBxF0NT color=#092186>STEP 

5. </F0NTx/B> <F0NT si ze=l>Sel ect "Comma Separated values (windows)" and click 
Next . </FONT></FONT><BR> 

<FONT 

face-" Verdana, Arial, Helvetica, sans-serif" size=2><BxF0NT color=#092186>STEP 

6. </F0NTx/B> <FONT size=l>Enter a convenient file location and name ending in 
.CSV and click Next </ FONTx/ FONT><BR> 

<FONT 

face="verdana, Arial, Helvetica, sans-serif" size=2xBxF0NT color=#092186>STEP 

7 . </.FOrslI></B> <F0NT size=l>click Finish </ FONTx/ FONTx BR> 

<FONT 

face="Verdana, Arial, Helvetica, sans-serif" size=2xBxF0NT color=#092186>STEP 

8. </F0NTx/B> <FONT size=l>Go to Email List page of eyardsigns.com</FONT> 

</FONT><BR> 
<FONT 

face="Verdana, Arial, Helvetica, sans-serif" size=2xBxF0NT color=:#092186>STEP 

9. </F0NTx/B> <FONT size=l>Find the "Import from Outlook" section, select the 
CSV file you just created (if it is not listed in the folder you saved the file 
to, make sure "Files of type" pulldown in the Open Window is set to "All 
Files"), and choose "import Now" to import your outlook addresses to your 
eyardsigns.com account. </FONT></FONT> 
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palm. htm 

<FONT face="verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

1. </F0NT></B> <FONT size=l>Open Palm Desktop </FONT><br> 

<FONT face="verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

2. </F0NT></B> <FONT si ze=l>Sel ect the "Address" icon 
from the left toolbar </FONT> 

<FONT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
col or=*092186> STEP 

3. </F0NT></B> <FONT si ze=l>Sel ect the File / Export 
. . . Menu Option </FONT><BR> 

<FONT face="verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

4. </F0NT></B> <FONT si ze=l>5el ect "Comma Separated 

value C*.csv, *.txt)" from the Export As pulldown menu </font><br> 
<FONT face="verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color-#092186>STEP 

5. </F0NT></b> <F0NT size=l>Enter a file name and 
click Export </font><br> 

<FONT face="verdana, Arial, Helvetica, sans-serif" size-2><B><F0NT 
color=#092186>STEP 

5.</F0NT></B> <FONT size=l>Make sure all the fields 

are selected, the first one is "Last Name", the second one is "First Name , and 
the last one is "Category" </FONT><BR> 

<FONT face="verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

7. </F0NT></B> <FONT size=l>Click OK. </FONT><BR> 

<FONT face=" Verdana, Arial, Helvetica, sans-senf" si2e=2><B><F0NT 
color=#092186>STEP 

8. </F0NT></B> <FONT size=l>Go to&nbsp ; Emai 1 List page of 
eyardsiqns^com </F0NT><BR> 

<F0NT face=" Verdana, Arial, Helvetica, sans-serif" size=2><B><F0NT 
color=#092186>STEP 

9. </F0NT></B> <FONT size=l>Find the "Import from Palm . ^ • 
Desktop" section, select the CSV file you just created (if it is not listed in 
the folder you saved the file to, make sure "Files of type" pulldown in the Open 
window is set to "All Files"), and choose "import Now" to import your Palm 
addresses to your eyardsigns.com account .</FONT> 
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aboutus.inc 

<hl>About us</hl> , . . L 

<p>ElectionMa11 .com, is a privately held, non-partisan company that is the 
Internet's . ^ , , . ^ • 

premier campaign/election vortal destination for candidates, citizens and their 
representatives. Each site is globally patent pending and trademarked, focused 
on meeting the demand for campaigning over the world Wide Web, </p> 
<p><b>History</b><br> ^ ^ ^ . ^ - ^ u- 

In 1997, Simer Singh, President & Co-Founder of ElectionMall.com, advised his 
brother, Ravi Singh, to run his election for Illinois State Representative via 
the World Wide web and use Email to communicate to his voters. Ravi agreed and 
held a town hall meeting to explain their idea and collected Emails to communicate 

to his voters. <br> . , ^ ^. j= 

In 1999, Simer Singh and his brother Ravi Singh, received angel funding for 
the development and creation of ElectionMall.com inc. ©weAreTheSol ution.com 
inc. finishes final developments of the internet site construction.. <br> 

2000, ElectionMall.com research market for early launch date and forms strategic 
alliances.<br> 

In 2000, <b>Dr. Chirinjeev Kathuria</b>, agreed to be an investor and Chairman 
of the Board of ElectionMall.com, and with his recent success of other companies 
helped privately fund the <i><b>ElectionMall .com</b></i> Project. On July 5th 
ElectionMall -com launched with 8 unique sites providing voters and candidates 
with the ability to use various tools and services for "ecampaigning . Everyone 
from Student Body president, to every citizen, and even the President of the 
united States will be able to communicate with their voters via ElectionMail.com. 
<br> 
<br> 

<b>What is ElectionMall .com? </b><br> 

.<b:r> . - -^ ^ 

<b> OujL vision </b> <br> . ^ ^ . • u 

TO provide <i>Campaign Political Tools and Services</i> for all those who wish 

to stand for any election. ElectionMall.com will provide high quality products 

and services in the political industry to anyone via the internet. <br> 

<b> Our Plan</b> <br> . _ . . 

To find solutions for the campaign manager, politician, political novice, or 

even the apolitical to gather information on issues, candidates, vendors, and 

real-time developments in Politics. We strive to be creative and practical eyery 

step of the way by creating strategic alliances and long-term partnerships with 

the most well respected and professional companies in the business. <br> 

<br> 

<b> What is a vortal ?</b> <br> „ . . ^ ^ 

ElectionMall.com is a "VORTAL". what is a "VORTAL?" First let us understand 
a "PORTAL". A "PORTAL" is a "<i>super-si te</i>" that provides a variety of 

services , ^ -t 

including web searching, news, white and yellow pages directories, free e-mai 1 , 
discussion groups, online shopping and links to other sites. A 'VORTAL is a 
vertical -market web site that provides information and services to a particular 
industry, such as Politics. It is the industry-specific equivalent of the 

general -purpose ^ . , „ » ■ i - i.^ 

portal on the Web. In our case, ElectionMall.com is the VORTAL , with eight 
other sister dot com's (portals) that work hand-in-hand to provide a universe 
of powerful Political information and e-Campaigning Solutions and Services all 
in one place. ElectionMall .com is basically a main hub for both people in politics 

and those who wish to learn and participate in this complex Political World. 
ElectionMall.com provides real-time news, online chat, powerful search 
capabilities . 
via user category, events calendar, and much more to come. <br> 

<br> 

<B><a href="management.asp">Management Team</b></a> 
<BR><BR> 
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aboutus.inc 
<a href="press.asp">ePress Center </a><br> 
<br> 

<b>Other Sites </b><br> 

<ul type=disc> ,^ , . ^ . t^- n 

<li><a href="http://www.eyardsigns.coni > www.eyardsigns .com </a>- A ponticai 

campaign . . . n i. tt 

tool for campaign managers and politicians. A one of a kind portal that allows 
the campaign managers or politicians to directly market there customized 

eYardsigns, . , . , . - ^u- 

similar to an online greetingcard, to their exact demographics via this 

patent-pending 

technology for <b>FREE! </li><br> 

<li></b><a . ,„ -, . L ■ / 

href="http://www.electionmall . com/el ectionshopping/ >www.electionsho|pping.com</a> - 
The name says it all. This one stop shop portal, allows campaign directors and 
purchasers not only to directly buy political campaign materials, books and 
publications, but also search from a vast database of consulting and Campaign 
Services. Another plus of ElectionShopping.com is to provide you various internet 
services from designing a simple banner for your campaign to <i>High Tech Complex 
websites</i> for the candidates. </li><br> 

<li><a href="http://www.mypublicservant.com">www.mypublicservant.com</a> - This 
portal allows anyone who needs web space, wants to create their own custom website 

ONLINE (site builder), create their own domain name, an exciting online chat 

service and have unlimited email - all for free! </li><br> _ 

<1 i ><a h ref =" http : / /www . el ecti onmal 1 . com/pol i t i cal f avo r/ >www . pol i ti cal favor . com 

</a>- What ^ . , . , m 

is the internet missing? A Political Favor site, which allows any user to 

"^^in^the^bulletin board and learn about different key topics which them succeed. 

.</li> . 
<br> ^ 

href="http : //www. el ecti onmal 1 . com/fund rai si ngbycheck/">www . f undrai si ngbycheck. com</a 

^ Yes, raise funds via the world Wide Web by personal checks. FundRaisingByCheck.com 

taps into a new and emerging market for online campaign fundraising, charity 
events, community groups, and schools all of which wi 11 allow people to donate 
and raise money checks online! </li><br> . . / 

<li><a href="http://www.electionman .com/citizensfor >www. citizenfor.com </a>- 

CitizensFor.com , ^ . u ^ u 

believes that if there is going to be a truly FREE world, there has to be a 
political voice for the Internet citizensFor.com is dedicated to provide that 
void through an Illinois Political Action committee. This site allows users 
to do a variety of things, such as lobby on particular issues to volunteer their 
services back to their community. </li><br> . . / 

<li><a href ="http: //www. el ecti onmal 1 .com/el ecti onel aw/ >www.electionelaw.com</a> - 

A database _ , i_ ■ u 

of the most recent campaign results and terms and guidelines for those who wish 
to run for public office whether it is public or private. </li><br> 
<1 i ><a h ref =:"http : //www . el ecti onyel 1 owpages . com">www . el ecti onyel 1 owpages , com</ a> 
- The only site in the world wide Web which allows users to search businesses 
and services in the political industry via the online yellow pages. </li></ul></p> 
<p>if you have any questions or comments regarding ElectionMall.com please email 

"%a href="mai 1 to :AboutUs@el ecti onmal 1 .com">Aboutus@el ecti onmal 1 .com</a></p> 
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Adrot_lng.txt 

REDIRECT scn'pts/adredi r.asp 
WIDTH 468 
HEIGHT 60 
BORDER 0 

http : //www . el ect i onmal 1 . com/ads/check , gi f 
http://www. el ectionmall . com/fund rai si ngbycheck/ 
Make a Political Donation, Fundrai si ngbycheck 

http : //www . el ecti onmal 1 . com/ads/publ i cseravntZ . gi f 
http : //www . mypubl i cse rvant . com 
Create your own homepage 
10 

http : //www . el ecti onmal 1 . com/ads/neweyardbanner , gi f 

http : //www , eyardsi gns - com 

Send eyardsigns to your supporters 

10 

http : //www . el ecti onmal 1 . com/ads/el ecti onmal 1 . gi f 
http : //www . el ecti onMal 1 . com 
Looking for volunteers 

http : //www . el ecti onmal 1 . com/ads/ci ti zenfor , gi f 
http : //www . el ecti onMal 1 . com/ci ti zensf or/ 
The Internet's Political Action committee 
10 

http : //www . el ecti onmal 1 . com/ads/wat s . gi f 
http : //www. wearethesol ution , com 
Your internet solution company 
10 

http : //www . el ecti onmal 1 . com/ads/check2 . gi f 
http:: //wtfw^el ecti onmal 1 . com/f undrai si ngbycheck/ 
Make a PoJitical Donation, Fundrai si ngbycheck 

10 

http : //www . el ecti onmal 1 . com/ads/wat s2 . gi f 
http : //www . wearethesol uti on , com 
Your Internet solution company 

10 

http : //www . el ecti onmal 1 . com/ads/publ i cservant . gi f 
http : //www . mypubl i cse rvant . com 
Create your own homepage 
10 

http : //www . el ecti onmal 1 . com/ads/wats4 . gi f 
http : //www. wearethesol ution . com 
Your Internet solution company 
10 
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REDIRECT scripts/adredi r.asp 

WIDTH 468 
HEIGHT 60 
BORDER 0 

it 

http : //www . el ecti onmal 1 . com/ads/ rnc . gi f 
http://www. rnc.org/ 

40 

http : //www . el ecti onmal 1 . com/ads/publ i cse ravnt2 , gi f 
http : //www . mypubl i cservant . com 
Create your own homepage 
10 

http : //www . el ecti onmal 1 . com/ads/neweyardbanner . gi f 

http : //www . eyardsi gns . com 

Send eyardsigns to your supporters 

10 

http : //www . el ecti onmal 1 . com/ads/el ecti onmal 1 . gi f 
http : //www . el ecti onMal 1 . com 
Looking for volunteers 

http : //www . el ecti onmal 1 . com/ads/ci t i zenf or . gi f 
http : //www . el ecti onMal 1 . com/ci ti zensf or/ 
The Internet's Political Action Committee 
10 

http : //www . el ecti onmal 1 . com/ads/wats2 . gi f 
http : //www .wear ethesol uti on . com 
Your Internet solution company 

http : //www . el ecti onmal 1 . com/ads/wats4 . gi f 
ht-tp^: //A/Jww^wearethesol uti on . com 
Your inte^^net solution company 
10 
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<form nanie="forml" action:="advertise_done,asp" method="post"> 

<table border=0 cenpadding=4> 
<tr> 

<td colspan=2 clas5="normal " valign=top > 

<hl>Advertise with us</hl> 

<p ><b>Advertising Opportunities 

wi th El ecti onMal 1 . com</b><br> 

<B>where 

everyday is a campaign</b></p> 

<p>ElectionMan .com . .... 

is the leading web-vortal for Political Information & services, which is 
designed to help people efficiently run their campaigns, research 
information, purchase campaign goodies, promote their site, search the 
political yellow pages, and much more.ElectionMall.com brings politicians and 
citizens together for all 

types of community activities, fundraisers, and group activities - 
ElectionMall.com helps generate excitement and build momentum around a 
campaignlElectionMall.com vortal 

offers the one-stop political campaign solution and citizen resource center 
for people who just want to learn and get involved in this complex political 
world. ElectionMall.com provides a . . u 

host of activity- related services, tips, and content to make it easier than 
ever for people to plan and organize their campaigns, get involved in their 
community as well as group discussions, and attend a host of events that may 
be coming up. </p> 

<p >El ecti onMall .com users can use the services and 

products from this vortal to help manage and run their campaigns as well as 
allows the citizens to learn and absorb vital political information all in 
one place. El ecti onMall .com' s 

-services- unlimited, offer advertisers a wide variety of highly contextual 

target4flg opportunities like:</p> 

</td> 
</tr> 
<tr> 

<td width="50%" valign=top class="normaV'> 

<b><p>ecampai gni ng<br> 

El ectionshoppi ng<br> 

web-based site creation<br> 

Political bulletin-board<br> 

Fundraising services<br> 

citizen invol vement</b></p> 

</td> 

<td widths" 50%" class="normal "> 

<p ><b>Political Event s<br> 

Emai 1 servi ces<b r> 

Domain name creation<br> 

Powerful yellow pages<br> 

Live chat * s</b></p> 

</td> 
</tr> 
<tr> 

<td colspan=2 class="normal "> 

<p> <b>why Advertise with ElectionMall .com?</b><br> ^ 

No other advertising vehicle has ever been able to offer advertiser s such a 

targeted political vortal. where else .... 

can advertisers prepare such a powerful stream of directed advertising to 

both political people and citizens alike? . . 

ElectionMall.com provides an engaging experience for its political and 

apolitical active users. 

ElectionMall.com users, such as politician's and campaign manager s, 
visit the site to organize campaign solutions and activities but also return 
where they can communicate to their voters and volunteers about an event, 
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create support, voice their opinion, send reminders about different occasions 
and events, and make commerce-based decisions around their campaign. 
ElectionMall .com's citizen's have the 

political world in their hand to enhance their knowledge about politics, get 
involved in their community, voice their opinion, engage in live chats and 
forums, research politicians' activities, and much more. <B> 
El ectionMall .corn's Advertising Programs and Sponsorships </b></p> 
<ul type=disc> 
<li >ElectionMall .com' s 

ongoing, consumer and political -oriented PR <i>campaign</i> is designed 
to specifically target the right demographics and create the best 
solution around the service and the brand. </li> 
<1 i >El ecti onMal 1 . com 

offers strategic programs specifically tailored for advertisers to help 
drive your target market to your advertising message. </li> 
<li >El ecti onMall .com 

offers a variety of marketing solutions such as banner ads, promotional 
opportunities, and email advertising.</li> 
<li >El ecti onMall .com 

is increasing its visibility through an aggressive online and offline 
advertising campaign designed to help build brand recognition and 
acquire and retain your customers. </ I i> 

</ul> 

<p ><b>Packages</b><br> 

ElectionMall.com will work closely with advertisers to carefully <i>e-tailor</ 
advertising packages that provide the maximum amount of exposure and results, 
ElectionMall.com offers several different advertising vehicles, including 
highly targeted banner placements, preferred positioning, and advertising in 
emai 1 correspondence . </p> 

-<p <br> - 

<b>Ele^i onMall .com Contact lnformation<br> 
</b>Please contact us regarding 

any advertising opportunities your company may have, 
simply fill out the form below and click 
'Submit', and one of our Advertising 

specialists will get back to you as soon as possible. (* = 
Requi red)</p> 
<p ></p> 

<table border=0 cellspacing=0 cellpadding^O class="normal "> 
<tr> 

<td valign=top clas5="normal "> 

First Name*: </td> 

<td valign=top class="normal "> 

<INPUT TYPE="TEXT" SIZE="24" NAME="f i rst_name"> 

</td> 
</tr> 
<tr> 

<td valign=top class="normal "> 
Last Name*: </td> 

<td valign=top class="normal "> 

<INPUT TYPE="TEXT" SIZE="24" NAME="1 ast_name"> 

</td> 
</tr> 
<tr> 

<td valign=top class="normal "> 

Company Name*: 
</td> 

<td valign=top class="normaV'> 

<INPUT TYPE="TEXT" SIZE="24" NAME="company„name"> 

</td> 
</tr> 
<tr> 
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<td va1ign=top class="normaV'> 

Title: 
</td> 

<td valign=top class=" normal "> 

<INPUT TYPE="TEXT" SIZE-"24" NAME="ti tle"> 
</td> 
</tr> 
<t r> 

<td valign=top class="normal "> 

E-mail Address*: 
</td> 

<td valign=top class="normal"> 

<INPUT TYPE="TEXT" SIZE="24" NAME="emai 1 "> 

</td> 
</tr> 
<tr> 

<td valign=top class="normal"> 

Phone Number*: 
</td> 

<td valign=top class="normal "> 

<INPUT TYPE="TEXT" SIZE="24" NAME="phone"> 

</td> 
</tr> 
<tr> 

<td valign=top class="normal"> 

Home Page URL*: 
</td> 

<td valign=top class="normaV'> 

<INPUT TYPE="TEXT" SIZE="24" NAME="urV'> 

</td> 
<tr> 

<td valign=top class="normal "> 
what types of opportunities <br> 

is you company interested in?  
</td> 

<td valign=top class="normal "> 

<TEXTAREA NAME="opportuni ti es"></TEXTAREA> 

</td> 
</tr> 
<tr> 

<td valign=top colspan=:"2" align="center"> 

<input name="submitl" type="submi t" value="Submit > 

</td> 
</tr> 
</tabl e> 
</td> 
</tr> 
</table> 
</form> 
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<hl>Affiliate Program </hl> 

<p>lncrease your profits by joining our <b>free</b> ElectionMall . com Affiliate 
Program, 

All you have to do is place a ElectionMall .com button, banner, or text link on 
your site. You'll earn a commission on every sale originating from your site every 
time a visitor clicks through to make a purchase at Election5hopping.com online 
store. ElectionMall .corn's Affiliate Program is a terrific way to add e-commerce 
to your web site. <b>lt's easy to join,</b> and best of all, <b>it's free!</b> 
<br> 
<br> 

<b>Join ElectionMall .corn's Affiliate Program Today! </b><br> 
Here's how to get started: <br> 

1. Review our <a href ="http: //www. eyardsigns.com/affiliate_agreement.asp">Af filiate 
Agreement .</a> <br> 

2. Fill out our easy online <a 

href="http : //www . eyardsi gns . com/Af f i 1 i ate_si gnup . asp">Af f i 1 i ate 
Enrollment Form.</a> <br> 

3. Once your application is processed, we'll provide you with all the tools you 
need. <br> 

It's as simple as that, and your earnings are unlimited. <br> 
<br> 

<b>Electionmall .com Affiliate Benefits</b> <br> ^ 
When you add this retail element to your site, you partner with one of the Web s 
leading internet commerce sites. <br> 
we offer our affiliates the following benefits: <br> 

<li>Earn a commission on every sale you make. The more you sell, the more you earn! 
<a href="http://www.electionmall -com/Affiliate„signup.asp">Click here to sign 

up .</a> <li> _ . 

The ElectionMall.com Affiliate Program is <b>free of charge</b> to you! <n> 
Links from your web site to ElectionMall.com are easy to install, we'll 
automat4caJly 

provide updates with our latest exciting offers. <br> 
<b>where do I get answers to my other questions?</b> <br> 

visit our <a href="http://www.electionmall .com/affiliate_FAQ.asp">Affiliate FAQ</a> 
for more information. <br> 
Still have questions? <br> 

E-mail <a href="mail to:affiliates®ElectionMall .com">affiliates©ElectionMall .com</a>. 
</p> 
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<P aliqn=center style=:"TEXT-ALIGN: center"><SPAN 

style^'^FONT-FAMlLY: Verdana; FONT-SIZE: 10pt">Affiliate Program Contract 
El ecti onMal 1 . com<o : px/o : px/SPANx/ P> 
<p aliqn=center style="TEXT-ALlGN: center"><SPAN 
style= FONT-FAMILY: Verdana; font-size: 10pt">i agree<SPAN 
styl e="mso- tab- count : 1"> </SPAN><o : px/o : p></SPAN></P> 

<PxSPAN style="FONT-FAMlLy: Verdana; FONT-SIZE: 10pt">This ElectionMa 11 -com 
Affiliate Network Agreement (the "Agreement") contains the terms and conditions 
that shall apply to an individual's or an entity's participation in the 
ElectionMall.com, inc. affiliate program (the "Affiliate Network"). As used in 
this Agreement, "ElectionMall.com," "we", "us" or "our" refers to 
ElectionMall.com, inc; "web Site" shall mean a site on the world Wide web on the 
internet; "ElectionMall.com Site" refers to the Web site operated by 
ElectionMall.com that is currently located at the URL www.ElectionMall.com; 
"Product" refers to any item listed for sale on the ElectionMall.com Site, and 
all dollars ($) shall mean United States dollars. <o: px/o: px/SPANx/ P> 
<P><SPAN styl e=" FONT- FAMILY: Verdana; FONT-SIZE: 10pt">THIS IS A LEGAL AGREEMENT 
BETWEEN YOU AND ELECTI0NMALL.COM, BY CLICKING ON THE "I AGREE" BUTTON AT THE END 
OF THIS AGREEMENT, YOU ARE AFFIRMATIVELY STATING THAT YOU HAVE READ AND 
UNDERSTOOD THE TERMS SET FORTH HEREIN, ARE AFFIRMATIVELY INDICATING YOUR 
ACCEPTANCE OF THIS AGREEMENT AND YOU AGREE TO BE BOUND BY THE TERMS HEREOF. 
<o:px/o:px/SPANx/P> ^ „ . t, ^ • 

<PxSPAN Styl e=" FONT- family: Verdana; font-size: 10pt">l. <B>Enrollment in the 
Network. </B> To become a participant in the Affiliate Network, you will have to 
submit a complete application via the ElectionMall . com Site, web Sites outside 
of the continental united States may participate in the Affiliate Network, 
although we do not currently ship Products internationally. We will evaluate 
your application in good faith and will notify you of our acceptance or 
rejection- we may reject your application if we determine, in our sole 
discretion, that your web Site is unsuitable for the Affiliate Network for any 
reason:^ some of the reasons that your Web Site may be found to be unsuitable 
include, --but are not limited to, the posting of content that is in any way 
unlawful, infringing, harmful, threatening, defamatory, obscene, harassing, 
racist or otherwise objectionable, in our sole discretion (collectively Content 
Restrictions")- if we accept your application and your Web Site is thereafter 
determined (in our sole discretion) to violate the Content Restrictions, then we 
may terminate this Agreement. <o:p></o:p></SPANx/P> , 
<PxSPAN styl e=" FONT- family: Verdana; FONT-SIZE: 10pt">2. <B>utilizing Our Links 
on Your Site.</B> As the operator of an affiliate site on the Affiliate Network 
("Affiliate Web site"), we will make available to you the graphics and text for 
ElectionMall.com banner advertisements and button links and/or text links that 
identify ElectionMall.com. These banner advertisements, button links and text 
links will each provide a direct connection from the Affiliate web Site to the 
ElectionMall.com Site, and may be referred to individually or coll ecti yely as 
"Links". You agree to prominently display the Links on the Affiliate Site, 
subject to our guidelines and approval. You further agree that you will 
cooperate fully with us in establishing and maintaining such Links. You shall 
not alter, modify or expand any Link without our prior written consent. We have 
the right in our sole discretion to monitor the Affiliate Site at any time to 
determine if you are in compliance with this Agreement. <o: px/o: px/SPANx/ P> 
<PxSPAN style="FONT-FAMlLY: Verdana; FONT-SIZE: 10pt">3. <B>Order 
Processing. </B> we will process all orders placed by customers on the 
ElectionMall.com Site. We reserve the right to reject any orders, in our sole 
discretion, we will be solely responsible for all aspects of order processing 
and fulfillment, including order entry, payment processing, shipping, 
cancellations, returns and related customer service. <o:px/o:px/SPANx/p> 
<PxSPAN style="FONT-FAMlLY: Verdana; FONT-SIZE: 10pt">4. <B>Customer 
Tracking. </B> we will track your "Identified Customers" (as defined below) and 
the volume of sales generated from such Identified Customers. You will be given 
a password and have the ability to retrieve reports of the sales statistics 
generated by your identified Customers on a daily basis. The form and content of 
the reports may vary from time to time. Such information may be subject to 
delays and we make no warranties or representations of the accuracy of such 
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sales information. To permit accurate tracking, reporting, and fee accrual, you 
must ensure that the Links between the Affiliate web Site and the ^ 
ElectionMall.com Site are properly formatted on the Affiliate web site. For 
purposes of this Agreement, "Identified Customer" shall mean a customer that Caj 
purchases Products after directly linking from the Affiliate Site to the 
ElectionMall.com Site, or within two (2) days of using such Link, (b) makes full 
payment for such purchases, and (c) is identified and tracked through a unique 
identifier by ElectionMall.com from the Affiliate site. <o:p></o:p></SPAN></P> 
<p><SPAN style="FONT-FAMiLy: Verdana; FONT-SIZE: 10pt">5. <B>Commi ssions .</B> we 
will pay you a commission to be agreed upon of the Net sales (as defined below) 
of all of the purchases by your Identified Customers. In the event that an 
Identified Customer purchases the Bottomless Bowl subscription, you will only 
receive a commission on the first such purchase by each identified Customer. The 
net sales commission may be referred to as "Commission". The percentage rate of 
the Commission is subject to change at any time, in our sole discretion. For the 
purposes of this Agreement, "Net Sales" shall mean sales revenues actually 
received by ElectionMall .com from the Identified Customers less sales taxes, 
duties, shipping, handling, credit card fees, returns, credits and similar 
charges. ElectionMall.com reserves the right to review all transactions eligible 
for commissions for possible fraud, in the event that ElectionMall .com discovers 
any fraud, ElectionMall.com may terminate this Agreement immediately. 
<o : px/o : p></SPAN></P> 

<P><5PAN style=" FONT- FAMILY: Verdana; FONT-SIZE: lOpt >6. <B>Commission ^ 
Payment. </B> We will pay you the Commissions on a monthly basis. Approximately 
thirty (30) days following the end of each calendar month, we will send you a 
check for the Commissions earned during such month. However, if the Commission 
payable to you for any month is less than fifty dollars ($50.00) (the 
"commission Payment Floor"), we will hold those Commissions until the first 
monthly payment following such time that the total amount due is at least equal 
to the Commission Payment Floor. The Commission Payment Floor is subject to 
change -^t any time in our sole discretion. You will be notified of any change in 
the Comm4«sion Payment Floor, if an Identified Customer returns a Product the 
sale of which generated a Commission, we will deduct the corresponding 
commission from the next monthly payment. If there is no Commission payable in 
the applicable month, then we will invoice you for the applicable amount, such 
invoice shall be due and payable immediately. <o:p></o:p></SPAN></P> 
<p><SPAN style="FONT-FAMlLY: Verdana; FONT-SIZE: 10pt">7. <B>Policies and 
Pricing.</B> Identified customers will be deemed to be customers of 
ElectionMall.com. Accordingly, all ElectionMall.com rules, policies, and 
operating procedures concerning customer orders, customer service, and sales 
will apply to identified Customers. We may change our policies and operating 
procedures at any time. We may also change Product prices and availability from 
time to time We will use commercially reasonable efforts to present accurate 
information, but we cannot guarantee the availability or price of any particular 
Product. <o:p></o:p></SPAN></P> „ « ^ n ■ 

<P><SPAN style=" FONT- FAMILY: Verdana; FONT-SIZE: 10pt'>8. <B>Non-Exclusive 
Limited License and use of ElectionMall.com Marks. </B> we grant you a 
non-exclusive, non-transferable, revocable right to use our logos, trade names, 
trademarks and similar identifying material (collectively "ElectionMall.com 
Marks") provided to you by ElectionMall.com hereunder, solely for the purposes 
anticipated by this Agreement. You agree use the ElectionMall.com Marks in a 
manner that will not disparage ElectionMall.com or that otherwise portrays 
ElectionMall.com in a negative light, we reserve all of our ownership, 
intellectual property and any other rights in the ElectionMall.com Marks, 
ElectionMan.com Site, Confidential Information, and any other materials or 
information associated with any of the foregoing. We may revoke the rights 
granted to you pursuant to this section at any time by giving you written 
notice. You shall not obtain any rights in or to the ElectionMall .com Marks. The 
rights granted to you pursuant to this section shall terminate upon the 
effective date of the expiration or termination of this Agreement. 
<o:p></o:p></SPAN></P> „ - 

<p><SPAN style=" FONT- FAMILY: Verdana; FONT-SIZE: 10pt">9. <B>Non-Exclusive 
Limited License and Use of Affiliate Marks. </B> You grant us a non-exclusive 
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license to utilize your name, logos, trade names, trademarks and similar 
identifying material (collectively the "Affiliate Marks") provided by you to 
ElectionMail.com hereunder, solely for the purposes anticipated by this 
Agreement and to advertise, market, promote and publicize the Affiliate Network 
or your participation therein in any manner. Notwithstanding anything herein to 
the contrary, we shall not be required to so advertise, market, promote or 
publicize, we agree to use the Affiliate Marks in a manner that will not 
disparage you or otherwise portrays you in a negative light. You reserve all of 
your ownership, intellectual property and any other rights in the Affiliate 
Marks, Affiliate Site, and any other materials or information associated with 
any of the foregoing. You may revoke the rights granted to us pursuant to this 
section at any time by giving us written notice, we shall not obtain any rights 
in or to the Affiliate Marks. This license shall terminate upon the effective 
date of the expiration or termination of this Agreement. <o:p></o:p></SPAN></P> 
<P><SPAN style="FONT-FAMlLY: Verdana; font-size: 10pt">10. <B>Publicity.</B> 
Except as expressly permitted herein, you shall not create, publish, distribute 
or permit any written or electronic material that makes reference to us, without 
first submitting such material to us and receiving our written consent. 

<0:P></0:P></SPAN></P> ...n. "r: 

<P><SPAN style-" FONT- family: Verdana; FONT-SIZE: 10pt">ll. <B>Responsibility for 
Your Site.</B> You will be solely responsible for the development, operation and 
maintenance of, and for all materials that appear on, the Affiliate web Site. 
Because price changes may affect Products listed on the Affiliate Web Site, you 
may not include price information in your descriptions, we reserve the right to 
monitor the Affiliate Web Site for compliance with the terms of this Agreement. 
<o : px/o : p></SPAN></P> 

<p><SPAN style="FONT-FAMiLY: Verdana; font-size: 10pt">12. <B>WAIVER of 

CONSEQUENTIAL DAMAGES AND LIMITATION OF LIABILITY. </B> WE WILL NOT BE LIABLE FOR 
INDIRECT, INCIDENTAL, SPECIAL, CONSEQUENTIAL OR PUNITIVE DAMAGES OF ANY KIND, 
INCLUDING WITHOUT LIMITATION ANY DAMAGES RESULTING FROM LOSS OF USE, LOSS OF 
BUSINESS", t.OSS OF REVENUE, LOSS OF PROFITS, OR LOSS OF DATA, ARISING IN 
CONNECTI-ON WITH THIS AGREEMENT, THE ELECTI0NMALL.COM SITE, THE AFFILIATE 
NETWORK, OR ELECTI0NMALL.COM' S PERFORMANCE OF SERVICES OR OF ANY OTHER 
OBLIGATIONS RELATING TO THE AGREEMENT, EVEN IF WE HAVE BEEN ADVISED OF THE 
POSSIBILITY OF SUCH DAMAGES. FURTHER, OUR AGGREGATE LIABILITY ARISING WITH 
RESPECT TO THIS AGREEMENT, THE ELECTI0NMALL.COM SITE, AND THE AFFILIATE NETWORK 
WILL NOT EXCEED THE TOTAL COMMISSIONS PAID OR PAYABLE TO YOU UNDER THIS 
AGREEMENT. THE FOREGOING LIMITATION OF LIABILITY SHALL APPLY REGARDLESS OF THE 
CAUSE OF ACTION UNDER WHICH SUCH DAMAGES ARE SOUGHT, INCLUDING WITHOUT 
LIMITATION, CONTRACT, TORT OR ANY OTHER LEGAL THEORY. <0 : px/o : p></SPAN></P> 
<p><SPAN style=" FONT- family: Verdana; font-size: 10pt">13. <b>warranty 

DISCLAIMERS. </B> WE MAKE NO EXPRESS OR IMPLIED WARRANTIES OR REPRESENTATIONS 
WITH RESPECT TO THE AFFILIATE NETWORK, THE ELECTI0NMALL.COM SITE, OR ANY PRODUCT 
OR OTHER ITEMS SOLD THROUGH THE AFFILIATE NETWORK OR ON THE ELECTI0NMALL.COM 
SITE (INCLUDING, WITHOUT LIMITATION, WARRANTIES OF FITNESS FOR A PARTICULAR 
PURPOSE, MERCHANTABILITY, NON-INFRINGEMENT, OR ANY IMPLIED WARRANTIES ARISING 
OUT OF A COURSE OF PERFORMANCE, DEALING, OR TRADE USAGE). IN ADDITION, WE MAKE 
NO REPRESENTATION THAT THE OPERATION OF THE ELECTI0NMALL.COM SITE WILL BE 
UNINTERRUPTED OR ERROR-FREE, AND WE WILL NOT BE LIABLE FOR THE CONSEQUENCES OF 
ANY INTERRUPTIONS OR ERRORS. <0 : px/o : p></SPAN></P> 
<P><SPAN style=" FONT- FAMILY: Verdana; FONT-SIZE: 10pt">14. 
<B>Confidentiality.</B> As a result of your participation in the Affiliate 
Network, we may disclose to you certain information that we consider to be 
confidential (herein referred to as "confidential information"). For purposes of 
this Agreement, the term "Confidential information" shall include, but not be 
limited to, any modifications to the terms and provisions of this Agreement, any 
of ElectionMal I .com's business and financial information, customer and vendor 
lists, pricing and sales information, and any members of the Affiliate Network, 
other than you. confidential information shall also include any information that 
we designate as confidential during the term of this Agreement, you agree not to 
disclose any Confidential Information and that you shall protect all such 
Confidential information as you protect your own confidential information, but 
in no event with less than reasonable care. You further agree not to use the 
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confidential information except as approved by ElectionMall.com. The aboye 
restrictions are not applicable to Confidential information that (a) is in your 
possession before disclosure to you, (b) is or becomes part of public knowledge 
unless as a result of your action or inaction, (c) is approved for release our 
written authorization, (d) is independently developed by you. in the event that 
you are required to disclose confidential information pursuant to a judicial or 
governmental order, you must promptly notify us to all time for us to respond to 
such order. <o:p></o:p></SPAN></P> 

<p><SPAN style="FONT-FAMlLY; Verdana; FONT-SIZE: 10pt">15. <B>Representations 
and Warranties.</B> You hereby represent and warrant to us as follows 
<o : px/o : p></SPAN></P> 

<P class=MsoNormal 5tyle="MARGlN-LEFT: 0.5in"><SPAN 

style="FONT-FAMlLy: Verdana; FONT-SiZE: 10pt">15.1. This Agreement has been duly 
and validly accepted by you and constitutes your legal, valid and binding 
obligation, enforceable against you in accordance with its terms , 
<o : px/o : p></SPAN></P> 

<P style="MARGlN-LEFT: 0.5in"><SPAN . , ^. . 

style="FONT-FAMILY: Verdana; FONT-SIZE: 10pt">15.2. The execution, delivery and 
performance by you of this Agreement will not violate nor constitute a defau-lt 
under (i) any provision of law, rule, or regulation to which you are subject, 
(ii) any order, judgment, or decree applicable to you or binding up9n your 
assets or properties, (iii) any provision of your by-laws or certificate of 
incorporation, or (iv) any agreement or other instrument applicable to you or 
binding upon your assets or properties. <o:p></o:p></SPAN></P> 
<p styTe= MARGIN- LEFT: 0.5in*'><SPAN 

style=" FONT- family: Verdana; FONT-SIZE: 10pt">15.3. You are the sole and 
exclusive owner of the Affiliate Marks and have the right and power to grant to 
us the license herein, and such license grant will not (i) breach, conflict with 
or constitute a default under any agreement or other instrument applicable to 
you or binding upon you, or (ii) infringe upon any trademark, trade name, 
servi re-mark, copyright, or other proprietary right of any other person or 
entity. •^:p></o:p></SPAN></P> 
<P style="MARGIN-LEFT: 0.5in"><SPAN 

style-" FONT- family: Verdana; FONT-SIZE: 10pt">15.4. No consent, approval , or 

authorization of, or exemption by, or filing with any governmental authority or 

any third party is required to be obtained or made by you in connection with the 

acceptance, delivery, or performance of this Agreement or the taking by you of 

any other action contemplated herein. <o:p></o:p></SPAN></P> 

<P style="MARGiN-LEFT: 0.5in"><SPAN ^ ^ . . 

style="FONT-FAMlLY: Verdana; FONT-SIZE: 10pt">15.5- The Affiliate Web Site and 

all materials or applications available on the Affiliate web Site do not violate 

or infringe upon the rights of any third party (including, for example, 

copyrights, trademarks, privacy, or other personal or proprietary rights), and 

are not libelous or otherwise illegal. <o:p></o:p></SPAN></P> 

<P style="MARGlN-LEFT: 0.5in"><SPAN . -, ^ 

style-" FONT- FAMILY: Verdana; font-size: 10pt">15.6. You are an adult of at least 

eighteen (18) years of age. <o:p></o:p></SPAN></P> 

<p><span style="FONT-FAMiLY: Verdana; font-size: lOpt >16. ^ -.^ u 

<B>lndemnification.</B> You hereby agree to indemnify, defend and hold harmless 
ElectionMall.com, its shareholders, officers, directors, employees, agents, 
affiliates, successors and assigns, from and against any and all claims, 
demands, losses, liabilities, damages or expenses (including attorneys fees and 
costs) of any nature whatsoever incurred or suffered by us (collectively the 
"Losses"), in so far as such Losses (or actions in respect thereof) arise out 
of, are related to, or are based on (i) the breach of any representation or 
warranty made by you herein; or (iii) or any claim related to the development, 
operation, maintenance or contents of the Affiliate Web site. 
<o:p></o:p></SPAN></P> j-^- ^- /« 

<P><SPAN style="FONT-FAMlLY: Verdana; FONT-SIZE: 10pt">17. <B>Modification.</B> 
we may modify any of the terms and conditions contained in this Agreement, at 
any time and in our sole discretion. Your continued participation in the 
Affiliate Network, following our posting of a change notice or new agreement on 
our site, will constitute binding acceptance of the change. 
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<o:p></o:p></SPAN></P> . _ 

<P><SPAN styles" FONT- FAMILY: Verdana; FONT-SIZE: 10pt">18. <B>Relationship of 
Parties. </B> You and ElectionMall .com are independent contractors, and nothing 
in this Agreement will create any partnership, joint venture, agency, franchise, 
sales representative, or employment relationship between the parties. You will 
have no authority to make or accept any offers or representations on our behalf. 
You will not make any statement, whether on your site or otherwise, that 
reasonably would contradict anything in this Section. <o:p></o:p></SPAN></P> 
<p><SPAN style=" FONT-FAMILY: Verdana; FONT-SIZE: 10pt">19. <B>lndependent 

invest igati on. </B> YOU ACKNOWLEDGE THAT YOU HAVE READ THIS AGREEMENT AND AGREE 
TO ALL ITS TERMS AND CONDITIONS. YOU UNDERSTAND THAT WE MAY AT ANY TIME 
(DIRECTLY OR INDIRECTLY) SOLICIT CUSTOMER REFERRALS ON TERMS THAT MAY DIFFER 
FROM THOSE CONTAINED IN THIS AGREEMENT OR OPERATE WEB SITES THAT ARE SIMILAR TO 
OR COMPETITIVE WITH YOUR WEB SITE. YOU HAVE INDEPENDENTLY EVALUATED THE 
DESIRABILITY OF PARTICIPATING IN THE AFFILIATE NETWORK AND ARE NOT RELYING ON 
ANY REPRESENTATION, GUARANTEE, OR STATEMENT OTHER THAN AS SET FORTH IN THIS 
AGREEMENT. <0 : px/o : p></SPAN></P> 

<p><SPAN styles" FONT- FAMILY: Verdana; FONT-SIZE: 10pt">20. <B>Term and 
Termination.</B> The term of this Agreement will begin upon our acceptance or 
your application and will end when terminated by either party. Either party may 
terminate this Agreement at any time, with or without cause, by giving the other 
party notice of termination. Notice by e-mail, to your address on our records, 
is considered sufficient notice to terminate this agreement. Upon such notice, 
you agree to promptly (a) remove any Links or other references to 
ElectionMall.com on the Affiliate web Site, and (b) return or destroy any 
Confidential information, ElectionMall.com artwork or other representations of 
the ElectionMall.com Marks. If this Agreement is terminated because you have 
violated the terms of this Agreement because the Affiliate Web Site violates the 
content Restrictions you will not receive any additional Commission payments, 
even for commissions earned prior to the date of termination. If this Agreement 
IS terminated for any other reason, you are only eligible to earn a commission 
on sal es^occur ring during the term of the Agreement, we reserve the right to 
withhold your final payment for a reasonable time to ensure that the correct 
amount is paid. <o:p></o:p></SPAN></P> . m 

<P><SPAN style- 'FONT-FAMILY: Verdana; FONT-SIZE: 10pt">21. <B>Miscenaneous.</B> 
This Agreement will be governed by the laws of the State of Delaware, without 
regard to conflicts of laws principles. Any action relating to this Agreement 
must be brought in the federal or state courts located in San Francisco, 
Delaware and you irrevocably consent to the jurisdiction of such courts. You may 
not assign this Agreement, by operation of law or otherwise, without our prior 
written consent- Subject to that restriction, this Agreement will be binding on, 
inure to the benefit of, and enforceable against the parties and their 
respective successors and assigns. Our fai lure to enforce your strict 
performance of any provision of this Agreement will not constitute a waiver of 
our right to subsequently enforce such provision or any other provision of this 
Agreement. This Agreement constitutes the entire understanding between the 
parties related to the subject matter and supersedes any prior or 
contemporaneous agreements. <o:p></o:p></SPAN></P> ^ 
<p><SPAN style-"FONT-FAMiLY; Verdana; FONT-SIZE: 10pt">THiS IS A legal agreement 

BETWEEN YOU AND ELECTI0NMALL.COM, BY CLICKING ON THE "I AGREE" BUTTON AT THE END 
OF THIS AGREEMENT, YOU ARE AFFIRMATIVELY STATING THAT YOU HAVE READ AND 
UNDERSTOOD THE TERMS SET FORTH HEREIN, ARE AFFIRMATIVELY INDICATING YOUR 
ACCEPTANCE OF THIS AGREEMENT AND YOU AGREE TO BE BOUND BY THE TERMS HEREOF. 
<o : px/o : p></SPAN></P> 
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<p align=center><font face="Anal" size=:"4">FAQ on ElectionMall.com Affiliate 
p rog ram</f on t></p> 

<p cl ass=MsoNormal xbxspan styl 6= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' >What 
is the ElectionMall -com Affiliate Program?</span></b><span styl e=' font-si ze : . 
10 . Opt ; f ont-f ami 1 y : Verdana ' > <span styl e= ' col o r : bl ack ' ><o : px/o : p></span></span></p> 

<p><span styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' >The El ecti onMal 1 . com 
Affiliate Program is an online, revenue-generating partnership between 
ElectionMall.com and you. You earn <b>commissions on all sales</b> made through 
a ElectionMall.com link on your site. We provide banners and text for your 
site, linking to ElectionMall.com. when a visitor from your site clicks through 
to ours, we track that customer's purchase activity and pay you <b>% of sales 
to be determined based on each application</b> (less shipping, taxes, returns, 
and canceled orders) on total orders placed. <o:p></o:p></span></p> 

<p><span style='font-size:10.0pt;font-family:Verdana'>Every month, we tally, 
your commissions and send you a check, (if your commissions for the month total 
less than $100, they'll continue to accrue; when they reach $100, we'll send 
your check at the end of that month's cycle.) That's all there is to it! 
<o : px/o : p></spanx/p> 

<pxbxspan styl e=' font-size: 10. Opt ;f ont-f ami ly: Verdana '>why become a 

El ecti onMal 1 . com af f i 1 i ate?</span></b><span styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : 

Verdana '> <o:px/o:px/spanx/p> 

<ul type=disc> 

<1 i cl ass=MsoNormal styl e= ' mso-margi n-top-al t : auto ; mso-margi n-bottom-al t : auto ; 
- -ms0-list:lO levell lfol;tab-stops:list 36.0pt'xspan styl e=' font-size: 
10.^1:; font-family:Verdana'>Youni make money. <o:px/o:px/spanx/li> 

<1 i cl ass=MsoNormal styl e= ' mso-margi n-top-al t : auto ; mso-margi n-bottom-al t : auto ; 
mso-list:10 levell lfol;tab-stops:list 36.0pt'xspan styl e=' font-size: 
10.0pt;font-family:Verdana'>Joining is free! <o:px/o:p></spanx/li> 

<1 i cl ass=MsoNormal styl e= ' mso-margi n-top-al t : auto ; mso-margi n-bottom-al t : auto ; 
mso-list:10 levell lfol;tab-stops:list 36.0pt'xspan styl e=' font-size: 
10.0pt;font-family:verdana'>lt's easy: ElectionMall.com will handle all of 
the ordering, shipping, billing, and customer service. Just sit back, 
relax, and earn commissions! <o:p></o:px/spanx/li> 

<li class=MsoNormal style='mso-margin-top-alt :auto;mso-margin-bottom-alt:auto; 
mso-list:10 levell lfol;tab-stops:list 36.0pt'xspan styl e=' font- size: 
10.0pt;font-family:Verdana'>A store on your site encourages repeat 
visitors - and adds value. <span style="mso-spacerun: yes '> 
</span><o : px/o : px/spanx/1 i > 

<1 i cl ass=MsoNormal styl e= ' mso-margi n-top-al t : auto ; mso-margi n-bottom-al t : auto ; 
mso-list:10 levell Ifol; tab-stops :list 36.0pt'xspan styl e=' font-size: 
10.0pt;f ont-f ami ly : Verdana '>we pay commissions on every product sold - you 
earn unlimited commissions! <o: px/o: px/spanx/1 i> 

</ul> 

<pxbxspan styl e=' font- size: 10. Opt; font-family: Verdana '>How can I track orders 

placed on your site and figure my commissi ons?</spanx/bxspan 

styl e= ' font- si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' > <o : px/o : px/span></p> 

<pxspan styl e= ' font-size: 10. Opt ;font-family:Verdana'>We' 11 do all the tracking 
for you. Once you have been approved and your site links are properly 
established, you'll have access to daily online reports tracking your sales 
performance. Simple instructions enable you to download the links that 
automatically track each purchase and where each visitor comes from. Monitor 
them via your own password-protected web-based interface. <o:px/o:p></span></p> 

<pxspan style=' font-size: 10. Opt ;f ont-f ami ly:Verdana'>To earn you commissions. 
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a purchase must be made <i>during the visit that resulted from your link</i>. 
The customer must accept delivery of the product at the shipping destination 
and remit full payment. For you to be eligible for additional commissions, 
customers must use your link for repeat visits. <o:p></o:p></span></p> 

<p><b><span style='font-size:10.0pt;font-family:verdana'>who is eligible to . 
parti ci pate?</span></b><span styl e= ' font- si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' > 
<o : px/o : p></ span></p> 

<p><span style='font-size:10.0pt;font-family:verdana'>Anyone with a web site 
can become a ElectionMall.com affiliate. Sites outside the continental united 
States may participate, although we currently do not ship products 
internationally, sites containing or advocating violence or offering 
defamatory, obscene, or pornographic material are not eligible to become 
af f i 1 i ates , <o : px/o : px/spanx/ p> 

<pxbxspan style='font-size:10.0pt;font-family:Verdana'>what does it 
cost?</span></bxspan 

styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : ve rdana ' > <o : px/o : p></span></p> 

<pxspan styl e=' font-size: lO.Opt; font-family: Verdana '>The ElectionMall .com 
Affiliate Program is absolutely free. There are no minimum sales requirements 
and no hidden fees. <o: px/o: px/spanx/ p> 

<pxbxspan style=" font-size: 10. Opt ;f ont-f ami ly : Verdana '>How often will I be 
pai d?</span></b><span styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' > 
<o : px/ o : p></span></p> 

<pxspan style='font-size:10.0pt;font-family:verdana'>we total your commissions 
and send you a check each month, if your commissions and rewards for the month 
are He^s' than $100, we continue to track them until they reach $100. Then we 
send you-a check at the end of that month's cycle, customers buy from our site 
in U.S. dollars. All commission payment checks to affiliates are denominated in 
U.S. dollars. <o:px/o:px/span></p> 

<p><b><span styl e= 'font-size: 10. Opt ;f ont-f ami ly:ve rdana '>How do I get 
started?</spanx/bxspan 

styl e= ' font- si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' > <o : px/o : p></span></p> 

<pxspan style='font-size:10,0pt;font-family:Verdana'>lt's easy. First read the 
<a href="affiliate_agreement .asp">Affiliate Agreement</a> and fill out the <a 
href=="affi li at e_signup.asp">Af filiate Enrollment Form</a>. we visit your site 
to make sure it's an appropriate match for our affiliate program and let you 
know within three business days whether you have been accepted. Then you simply 
download the links and place them prominently in appropriate areas of your 
site. <o:px/o:p></spanx/p> 

<pxbx5pan style='font-size:10.0pt;font-family:Verdana'>How do I create the 
links to the ElectionMall.com store?</spanx/bxspan styl e=' font-size: 10. Opt; 
f ont-f ami 1 y : Verdana ' > <o : px/o : p></spanx/p> 

<pxspan style='font-size:10.0pt;font-family:Verdana'>Once you're accepted as 
an affiliate, you can access our exclusive affiliate gateway --go there to 
download images and create links. <o:px/o:p></spanx/p> 

<pxbxspan styl e=' font-size: 10. Opt ; font-family : Verdana '>Can I become an affiliate 
if I don't have a web site?</spanx/bxspan styl e= ' f ont- si ze: 10. Opt ; font-family: 
Ve rdana '> <o:px/o:p></span></p> 

<p><span styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' >No . <o : px/o : px/ span></p> 

<pxb><span styl e=' font-size:10.0pt; font-family : Verdana '>can I link to other 
onl i ne stores?</spanx/bxspan styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' > 
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<o : px/o : p></span></p> 

<p><span style='font-size;10.0pt;font-family:Verdana'>Since ElectionMall ,com 
offers all the Election products and advice customers need, we don't think 




<p><b><span style='font-size:10.0pt;font-family:verdana'>what are my 
responsibilities, and what are those of ElectionMall .com?</span></b><span 
styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y -.Verdana ' > <o : px/o : p></span></p> 

<p><span styl e=' font-size: 10. Opt; font-family: Verdana '>You are responsible for 
setting up the links (by downloading the HTML code) in the appropriate areas of 
your site and for encouraging your audience to visit the ElectionMall.com site 
through your link, in order to drive traffic, the link should be placed 
prominently on your site. ElectionMall.com handles all the rest: orders, 
shipping, billing, customer service, returns — everything related to the 
shopper'^s experience, we track all orders from your site, calculate your 
commissions, and mail your check. <o:p></o:p></span></p> 

<p><b><span style=' font-si ze:10.0pt;font-f ami ly: Verdana '>Can I build my own 
campaign store or use content or product images from the ElectionMall.com 
site?</span></b><span , , , 

style= ' font- si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' > <o : px/o : px/spanx/ p> 

<pxspan style='font-size:10.0pt;font-family:Verdana'>No. in order for us to 
track commissions generated by your site, you must use the links (banners, 
buttons, and text) that are provided to the ElectionMall.com Web site. Images 
and content other than those links are the property of ElectionMall.com and 
<b>cariii6t<yb> . ^ , 

be used -by anybody who hasn't received written permission from the company. 
<o : px/o : p></span></p> 



on 



<pxb><span style=' font-si ze:10.0pt; font-family: Verdana '>Can I take orders 
my site?</spanx/bxspan styl e-' font-size: 10. Opt ; font-family: Verdana > 
<o : px/o : px/spanx/p> 

<pxspan 5tyle='font-size:10.0pt;font-family:Verdana'>No. All orders must go 
through the ElectionMall .com site. <o:px/o:p></spanx/p> 

<pxbxspan style= 'font-size: 10. Opt; font-family : Verdana '>what is the best place 
on my site to display the links?</spanx/bxspan style=' font-size: 10. Opt; 
font -f ami ly:verdana'><br> 

To maximize your commissions, we recommend placing the links: <o:px/o:px/spanx/p> 

<ul type=disc> . , _ ^ 

<li class=MsoNormal style=:'mso-margin-top-alt :auto;mso-margin-bottom-alt :auto; 
mso-list:ll levell lfo2; tab-stops: list 36.0pt'xspan style=' font-size: 
10. Opt ;f ont-f amily: Verdana' >0n the home page above the fold (the part of 
the screen initially visible without scrolling down). <o:px/o:px/spanx/li> 
<1 i cl ass=MsoNormal styl e= ' mso-margi n-top-al t : auto ; mso-margi n-bottom-al t : auto ; 
mso-list:ll levell lfo2; tab-stops: list 36.0pt'xspan styl e=' font-size: 
lO.Opt; font-family: Verdana '>in your site's dedicated shopping area. 
<o:p></o:px/span></li> . 
<1 i cl ass=MsoNormal styl e= ' mso-margi n-top-al t : auto ; mso-margi n-bottom-al t : auto ; 
mso-list:ll levell lfo2 ; tab-stops :list 36.0pt'xspan styl e=' font-size: 
10- Opt ;f ont-f amily: Verdana '>0n the navigation bar. <o:px/o:px/spanx/li> 

</ul> 

<pxbxspan style=*font-size:10.0pt ;font-family:Verdana'>lf I have more than one 
web site, can I be an affiliate for them all?</spanx/bxspan style= font-size: 
10 . Opt ; f ont-f ami 1 y : Verdana ' > <o : px/o : p></span></p> 
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<p><span styl e=' font- size: 10. Opt ;font-f ami 1y:Verdana'>Yes. Please complete one 
application, with a single URL, to let us know you want to participate as an 
affiliate, when you log on to your affiliate account, click on the account tab 
and then the sub-affiliate link, and follow instructions for adding additional 
web sites. <o:p></o:p></span></p> 

<p><b><span styl e=' font-size: 10. Opt; font-family: Verdana '>can I sell my own 
products on ElectionMall .com?</span></b><span styl e=' font-size: 10. Opt ; 
f ont-f ami 1 y : Verdana ' > <o : px/o : p></span></p> 

<p><span style='font-size:10.0pt;font-family:verdana'>Our merchandising 
department constantly evaluates new products, if you have a product that you'd 
like us to consider carrying, please send product information (and a sample, if 
applicable) to: <o:p></o:p></span></p> 

<p><span styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' >El ecti onMal 1 . com<br> 

Attn: Merchandising Department<br> 

<a 

href="mai 1 to : merchandi si ngdepartment@el ecti onmal 1 . com">merchandi si ngdepartmentOel ect 
i onmal 1 . com</a><o : px/o : p></span></p> 

<P><span style:='font-size:10.0pt;font-family:Verdana'>500 North Michigan Avenue 
<o : px/o : p></spanxBR> 

<span styl e= ' font- si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ' >Sui tel015<o : px/o : px/ span><BR> 

<span styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ; mso-fareast-f ont-f ami 1 y : "Ti mes New 
Roman"; 

mso-bidi -font-family: "Times New Roman" ;mso-ansi -language: EN-US imso-fareast-language: 
Ef*-l/S;m'so-bidi-language:AR-SA'>chicago, Illinois 60511 </spanx/p> 
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<% if not request. formC"taxid") = then 

for i = 1 to request. form. count - 1 

sMailBody = sMailBody + request. form. key (i) + " : " + 
Request . FormCi) + vbcrlf 
next 

set JMail = server. CreateObjectC'JMail .SMTPMaiV) 
'This is my local SMTP server 

DMail .serverAddress = "mail .wearethesol ution.com" 
'This is me 

3Mail. Sender = "Affiliate@electionmall.com" 
DMail .Subject = "Affiliate Request" 

JMail .AddRecipient "sachin@wearethesolution.com" 

DMail. Body = SMailBody 
JMail .Priority = 3 
'Send it . . . 
JMail .Execute%> 

<BR><BR><BR><BR><p al i gn="center "> 

<font face-"AriaV' size="2">information Transmitted. . .<br><8R> 
<a href="default.asp">Continue. . .</a><BR> 
</font><BR><BR></p> 

<%el se%> 

<form name="forml" action="affiliate_signup.asp" method="post"> 
<table border^O cellpadding=0 width=600 style='width:6.25in; 

mso-censpacing:1.5pt;mso-padding-alt:4. 5pt 4.5pt 4.5pt 4.5pt'> 

<tr> 

<td colspan=2 styl e=:' background: transparent; padding: 4. 5pt 4.5pt 4.5pt 4.5pt'> 
<p class=MsoNormal align=center style= 'text-align: center 'xspan 
^styTe=*font-si2e:10.0pt;font-family:verdana'>Join ElectionMall .corn's 
affili^rte community, and start earning cash! Earn a commission on every 
ElectionMall.com sale originating from your site. Start today! </span><span 
styl e= ' col or : bl ack ' ><o : px/o : p></span></p> 
</td> 

</tr> 

<tr> 

<td colspan=2 styl e=' background: transparent; padding: 4. 5pt 4.5pt 4.5pt 4.5pt'> 

<p class=MsoNormal align=center style=' text-align : center 'xspan 

styl e= ' font-si ze : 18 . Opt ; f ont-f ami 1 y : Verdana ; col or : #CC0000 ' > — Websi te 

Information — </span> <span style='color : black 'xo: px/o: p></span></p> 

</td> 

</tr> 

<tr> 

<td width=125 valign=top styl e= ' width: 93. 75pt; padding: 4. 5pt 4.5pt 4.5pt 4.5pt'> 
<p class=MsoNormal align=right styl e=' text-align: right 'xbxspan 
styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ; col or : #00003 3 ' >websi te Name 
</span></b><span 

styl e= ' col or : bl ack ' xo : px/o : px/span></p> 
</td> 

<td width=:475 valign=top style='width:356.2Spt;paddinq:4.5pt 4.5pt 4.5pt 4.5pt'> 

<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 

col or: #000033 'xiNPUT TYPE="TEXT" SI2E="50" NAME="websiteName"x/span><span 

styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >*</spanxspan 

styl 6= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; col or : #000033 ' > </spanxspan 

styl e= ' col 0 r : bl ack ' xo : px/o : px/span></p> 

</td> 

</tr> 

<tr> 

<td width=125 valign=top styl e= ' wi dth: 93. 75pt; padding: 4. 5pt 4.5pt 4.5pt 4.5pt'> 
<p class=MsoNormal align=right styl e=' text-align: right 'xbxspan 
styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ; col or : #000033 ' >websi te URL 
</span></b><span 
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styl e= ' col or : bl ack * ><o : px/o : px/spanx/ p> 

<td^width=475 valign=top style='width:356.25pt;paddinq:4, 5pt 4.5pt 4.5pt 4.5pt' 
<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; font-farm 1 y : Verdana ; 
color :#000033'xINPUT TYPE-"TEXT" SIZE="50" NAME=:"websi teurl " 
VALUE=:"http://"x/spanxspan ^, . / 

styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >"'</spanxspan 
styl e= ' font- si ze : 7 . 5pt ; f ont-f ami 1 y : Ve rdana ; col or : #00003 3 ' > </spanxspan 
styl e= ' col or : bl ack ' xo : px/o : px/span></p> 
</td> 
</tr> 

^<td width=125 valign=top style='width:93.75pt;padding:4. 5pt 4.5pt 4.5pt 4.5pt'> 
<p class=MsoNormal align=right style='text-align: right 'xbxspan 
styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Ve rdana ; color : #00003 3 ' >Tax ID# 
</span></bxspan 

styl e= ' col or : bl ack ' xo : px/o : px/span></p> 

^td^width=475 valign=:top style-'width:356.25pt;padding:4.5pt 4.5pt 4.5pt 4.5pt' 

<p cl ass=MsoNormal xspan styl e= ' font-si ze ; 7 . 5pt ; f ont-f ami 1 y : Verdana ; 

col or: #000033 'xiNPUT type-"TEXT" SIZE="25" NAME="taxld%</span><span 

styl e= ' col or : bl ack * xo : px/o : px/span></p> 

</td> 
</tr> 
'<t r> 

<td width=125 valign=top styl e= ' width: 93. 75pt; padding: 4. 5pt 4.5pt 4.5pt 4.5pt'> 




ite categories 

<7span><7b><span styl 

-<t.d*^width=475 va1ign=top sty1e='width:356.25pt;padding:4.5pt 4.5pt 4.5pt 4.5pt' 
' '<p class=MsoNorma1><b><span sty1e='font-size:7.5pt;font-farmly:verdana; 
co1or:#000033'>Choose up to 3 categories</span></b><span style= font-size: 
7.5pt;font-family:verdana;co1or:#000033'> </span><span style= font-size:13.5pt; 
f ont-f ami 1 y : ve rdana ; col or : red ' >*</span><span styl e= ' font-si ze : 7 . 5pt ; 
font-family:verdana;color:#000033'><o:p></o:p></span></p> 

<table border=0 cenpadding=0 width="100%" styl e= ' wi dth: 100. 0%;tnso- cell spacing: 
1.5pt'> 

%td style='padding: .75pt .75pt .75pt .75pt'> , ^ 
<p cl as s=MsoNormal xspan styl e= ' font- si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
color:#000033'><iNPUT TYPE="checkbox" NAME="b2cCategories[] 
VALUE="18">*Personal , , ^ , , 

Home Page</span><span styl e= ' col or : bl ack xo : px/o : px/spanx/ p> 
</td> 

<td styl e=' padding : .75pt .75pt .75pt .75pf> ^ ^ 
<p cl ass=MsoNormaT><span styl e=' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
col or: #000033 'xiNPUT TYPE= 'checkbox" NAME="b2cCategories[] 
VALUE="l">Arts</span><span 

styl e= ' col or : bl ack ' xo : px/o : px/span></p> 
</td> 

<td style='paddinq: .75pt .75pt .75pt .75pt > ^ ^ 
<p cl ass=MsoNormat><span styl e= ' font-si ze : 7 . 5pt ; f ont-f ami ly : Verdana; 
col or: #000033 'xINPUT TYPE="checkbox" NAME="b2cCategories[] 
VALUE="2">Busi ness</spanxspan 

styl e= ' col or : bl ack ' xo : px/o: p></span></p> 
</td> 
</tr> 

<td style='paddinq: .75pt .75pt .75pt .75pt'> , ^ 
<p cl ass=MsoNormal><span styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y:; Verdana; 
color:#000033'xlNPUT TYPE="checkbox" NAME="b2cCategories[J 
VALUE="4">Educati on</span><span 
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styl e= ' col or : bl ack ' ><o : px/o : p></span></p> 
</td> 

<tcl sty1e='padding:.75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNormal xspan styl e= * font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
color:#000033'><lNPUT TYPE="checkbox" NAME="b2cCategories[J " 
VALUE="5">Entertainment</span><span 

styl e= ' col o r : bl ack ' ><o : px/o : px/spanx/ p> 
</td> 

<td style='padding: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNormal xspan styl e= ' font- si ze : 7 . 5pt ; f ont-f ami 1 y : ve rdana ; 

col o r : #00003 3 ' xiNPUT TYPE=" checkbox" NAME-^bZcCategori es [] " 
VALUE="6">Family</spanxspan 

styl e= ' col or : bl ack ' xo : px/o : px/ spanx/ p> 

</td> 
</tr> 
<tr> 

<td style='padding:.75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
col or : #000033 ' xINPUT TYPE="checkbox" NAME="b2cCategori es [] " 
VALUE="7">Health</spanxspan 

styl e= ' col or : bl ack ' xo : px/o : p></span></p> 
</td> 

<td style='paddinQ:,75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNo rmal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
col or: #000033 'xiNPUT TYPE="checkbox" NAME="b2cCategories[]" value= 8 
&amp ; Li vi ng</spanxspan styl e= ' col or : bl ack " xo : px/o : px/spanx/ p> 
</td> 

<td style='paddinq:.75pt .75pt .75pt .75pt'> ^ 
<p cl ass=MsoNormal xspan styl e= ' font- si ze : 7 . 5pt ; f ont-f ami 1 y : Ve rdana ; 
color :#000033"xiNPUT TYPE="checkbox" NAME="b2cCategories[]" 
VALUE=-"-3!.'>Mature/Adult</span><span 

styl e=^ col or : bl ack ' xo : px/o : p></spanx/p> 

</tdr 

</tr> 
<tr> 

<td style='paddinq: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNormaTxspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
color :#000O33'xlNPUT TYPE="checkbox" NAME="b2cCategories[]" 
VALUE="9">News</5panxspan 

styl e= ' col or : bl ack ' xo : px/o : p></spanx/p> 
</td> 

<td style='paddinQ: .75pt -75pt .75pt .75pt*> 

<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
col or: #000033 'xiNPUT TYPE=" checkbox" NAME="b2cCategories[]" 
VALUE="10">Reqional</span><span 

styl e= ' col or : bl ack ' xo : px/o : p></spanx/p> 
</td> 

<td style='paddinq: .75pt .75pt .75pt .75pt'> 

<p class=MsoNormal xspan styl e=' font-si ze : 7 . 5pt ; font-f ami ly -.Verdana; 

col or : #000033 ' xiNPUT TYPE="checkbox" NAME="b2ccategori es [] " 
VALUE="ll">Sci ence</spanxspan 

styl e= ' col or : bl ack ' xo : px/o : px/span></p> 

</td> 
</tr> 
<tr> 

<td style='paddinq: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
color :#000033'xlNPUT TYPE="checkbox" NAME="b2cCategories[] " 
VALUE="12">Shoppi nq</spanxspan 

styl e= ' col or : bl ack ' xo : px/o : p></span></p> 
</td> 

<td style='paddinq: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNo rmal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
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color:#000033'><lNPUT TYPE="checkbox" NAME="b2cCategoriesC]" VALUE="14">Society 

&amp ; Cul tu re</span><5pan styl e= ' col or : bl ack ' ><o : px/o : p></span></p> 

</td> 

<td style^'padding: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNorma I xspan styl e= ' font-si ze : 7 . 5pt ; font-farm I y : Verdana ; 

color:#000033'><lNPUT TYPE=^'checkbox*' NAME="b2cCategories[]" 
VALUE=" 13 ">Sports</span><span 

styl e= ' col or : bl ack ' ><o : px/o : p></span></p> 

</td> 
</tr> 
<tr> 

<td style='paddinq: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; font-farm 1 y : Verdana ; 
col or : #000033 ' xINPUT TYPE="checkbox" NAME="b2cCategori es [] " 
VALUE=:"16">Technol ogy</span><span 

styl e= ' col or : bl ack ' ><o : px/ o : p></spanx/p> 
</td> 

<td style='paddinq: .75pt .75pt .75pt .75pt > . ^ 

<p class=MsoNormalxspan style='font-size:7.5pt;font-farmly:verdana; 
col or : #000033 ' xiNPUT TYPE="checkbox" NAME="b2cCategori es [] " 
VALUE==" 15 ">T ravel </spanxspan 

styl e= ' col or : bl ack ' xo : px/o : px/spanx/p> 
</td> 

<td style-'padding: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNormal xspan sty! e= ' font- si ze : 7 . 5pt ; f ont- farm ly : Verdana ; 
col or: #000033 'xINPUT TYPE="checkbox" NAME="b2ccategories[] ' 
VALUE="17">Women</span><span 

styl e= ' col or : bl ack ' xo : px/o : px/span></p> 
</td> 
</tr> 

.</tabl£> ^ ^ .-, J 

<p cla^s^=MsoNorrrial xspan styl e= ' f ont-si ze: 7. 5pt;font-f arm ly: Verdana; 

col or : #00003 3 ' xo : px/o : p></spanx/p> 

</td> 
</tr> 
<"tr> 

<td width=125 valign=top styl e=' width: 93. 75pt; background: transparent; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> .... 
<p class=wsoNormal align=right style=' text-align: right xbxspan _ 
styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ; col or : #000033 ' >Bn ef Descn pti on 
of website </spanx/bxspan styl e=' col or :bl ack 'xo: px/o :px/spanx/p> 

<td^width=475 valign-top style-'width:356.25pt;padding:4. 5pt 4.5pt 4.5pt 4.5pt'> 
<p cl ass=MsoNormal xspan styl e= ' font- si ze : 7 . 5pt ; font-farm 1 y : ve rdana ; 

color :#000033'XTEXTAREA R0WS="8" COLS="40" WRAP- "VIRTUAL" 

NAME="briefDescri ption"></TEXTAREAx/span><span 
styl e= ' col or : bl ack ' xo : px/o : px/span></p> 
</td> 
</tr> 
<tr> 

<td width=125 valign=top style='width:93.75pt;background:transparent ; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> . , , 

<p class=lvisoNormal align-right style- 'text-align: right xbxspan 
styl e= * font- si ze : 10 . Opt ; f ont-f ami 1 y : ve rdana ; co 1 or : #00003 3 >Websi te Stats 
</spanx/bxspan 

styl e= ' col or : bl ack ' xo : px/o : p></span></p> 

<td^width-475 valign-top style='width:356.25pt ;padding:4. 5pt 4.5pt 4.5pt 4.5pt'> 
<p cl ass=MsoNormal xspan styl e- ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
col or : #000033 ' xSELECT NAME="monthl yvi si tor s"> 

<0PTI0N SELECTED VALUE="0">Monthly Unique visitors 

<OPTION VALUE="499">Less Than 500 

<OPTION VALUE-"4999">500 - 5000 
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<OPTION VALUE="49999">5000 - 50,000 
<OPTION VALUE="499999">50,000 - 500,000 
<OPTION VALUE="500001">Over 500,000 
</SELECT><SELECT NAME="monthl yHi ts"> 
<OPTION SELECTED VALUE="0">Monthl y Page views 
<OPTION VALUE="499">Less Than 500 
<OPTION VALUE="4999">500 - 5000 
<OPTION VALUE-"49999">5000 - 50,000 
<0PTI0N VALUE="499999">50,000 - 500,000 
<0PTI0N VALUE="500001">Over 500,000 
</SELECT></span><span 

styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >*</span><span 

styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; col or : #000033 ' > </span><span 

styl e= ' col or : bl ack ' ><o : px/o : p></span></p> 

</td> 
</tr> 
<tr> 

<td width=125 valign=top style='width:93.75pt;background:transparent; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> 

<p class=:MsoNormal align=right styl e=' text-align: right 'xbxspan 

styl e= ' font- si ze : 10 . Opt ; f ont-f ami 1 y : Ve rdana ; col or : #00003 3 ' >websi te vi si tor 

Demog raphi cs </span></b><span styl e= ' col or : bl ack ' ><o : px/o : p></span></p> 

</td> 

<td width=475 valign=top style='width:356.25pt;padding:4. 5pt 4,5pt 4.5pt 4.5pt 
<p cl ass=MsoNormal xbxspan styl e= * font- si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
col or : #000033 ' >Gender</spanx/b><span styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : 
Verdana ; col or : red ' >*</spanxspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
col or: #000033 'xbr> „ „ 

<INPUT TYPE="radio" NAME="sex" VALUE="F">Mostly Female <INPUT TYPE= radio 

NAME="sex" VALUE="M">MOStly 

-.Male <INPUT TYPE=:" radio" NAME="sex" VALUE="B">Both <br> 
<b>Age^B> <o:p></o:px/spanx/p> 

<table border=0 cellpadding=0 width="100%" style='width;100.0%;mso-cellspacing 
1.5pt'> 
<tr> 

<td style='paddinq: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNormal xspan sty I e= ' font- si ze : 7 , 5pt ; f ont-f ami 1 y : ve rdana ; 
col or: #000033 'xiNPUT TYPE="checkbox" NAME="ageUnderl8" VALUE="y">Under 
18</spanxspan 

styl e= ' col or : bl ack ' xo : px/o : p></spanx/p> 
</td> 

<td style='paddinQ: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNo rmal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : ve rdana ; 
col or: #000033 'xiNPUT TYPE="checkbox" NAME-"agel8_25" 
VALUE="Y">18-25</spanxspan 

styl e= ' col or : bl ack ' xo ; px/o : p></spanx/p> 
</td> 

<td style='paddinq: .75pt .75pt .75pt .75pt*> 

<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 

color:#000033'xlNPUT TYPE= checkbox" NAME=:"age26_35" 
VALUE=" Y">26- 3 5</spanxspan 

styl e= ■ col or : bl ack ' xo : px/o : px/spanx/ p> 

</td> 
</tr> 
<tr> 

<td style='paddinq: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNo rmalxspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
col or: #000033 'xiNPUT TyPE="checkbox" NAME="age36_50" 
VALUE=" Y">36- 50</spanxspan 

styl e= ' col or : bl ack ' xo : px/o : p></span></p> 
</td> 

<td style=:'paddinq: .75pt .75pt .75pt .75pt'> 

<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
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col or: #000033 'xiNPUT TYPE="checkbox" NAME="age51„65" 
VALUE="Y">51-65</span><span 

styl e= ' col or : bl ack ' ><o : px/o : p></span></p> 
</td> 

<td style='padding: .75pt .75pt .75pt .75pt'> 

<p cl ass=:MsoNormal xspan styl e= ' font-si ze : 7 , 5pt ; f ont-f ami 1 y ; Verdana ; 
color:#000033'xlNPUT TYPE="checkbox" NA!viE="ageOver65" VALUE="Y">Over 
65</spanxspan 

styl e= ' col 0 r : bl ack ' xo : px/o : p></spanx/p> 
</td> 
</tr> 

</table> ^ ^ 

<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; font-farm 1 y : Verdana ; 

col or : #000033 ' xo : px/o : px/span></p> 

</td> 
</tr> 
<tr> 

<td width=125 valign=top styl e=' width: 93. 75pt; background: transparent; 

padding:4.5pt 4.5pt 4.5pt 4.5pt'> ^.^ 

<p class^MsoNormal align=:right styl e=' text-align: right 'x! [if 
! supportEmptyParas] >&nbsp ; < ! [endi f ] xspan 
styl e= ' col or : bl ack ' xo : px/o : p></span></p> 

<td width=475 va1ign=top styl e=' width: 356. 25pt; background: transparent ; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> 

<p cl ass=MsoNo rmal xbxspan styl e= ' font-si ze : 7 . 5pt ; font-farm 1 y : Verdana ; 
col or: #000033 '>Does your Website. . .</spanx/bxspan styl e=' font-size: 7. 5pt; 
font-family:verdana;color:#000033'xbr> 

Require a login? <INPUT TYPE=" radio" NAME='Vequi reLogin" VALUE="Y">Yes <INPUT 
TYPE=" radio" NAME="requi reLogin" value-"n">no 

offer Rewards/compensation? <INPUT TYPE=" radio" NAME="offerRewards" VALUE="Y">Yes 

<INPUT TYPE=" radio" NAME="offerRewards" value="n">no <br> 

Donate a portion of proceeds to an organization? <INPUT TYPE=" radio" 
NAME="donateProceeds" VALUE="Y">Yes 

<INPUT TYPE=" radio" NAME="donateProceeds" VALUE="N">No </span><span 

styl e= ' col or : bl ack ' xo : px/o : px/span></p> 

</td> 
</tr> 
<tr> 

<td width=125 valign=top style='width:93.75pt;background:transparent ; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> 

<p class=MsoNormal align=:right styl e=' text-align: right x![if 
!supportEmptyParas]> <! [endif]xspan 
styl e= ' col o r : bl ack ' xo : px/o : p></span></p> 
</tcl> . . 

<td width=475 valign=top style='width:355.25pt;background:transparent; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> 

<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; font-farm 1 y : Verdana ; 

col or: #000033 '>Do you manage more than one website? <INPUT TYPE=" radio 
NAME="manageMul ti pi e" VALUE='^Y">Yes 

<INPUT TYPE=" radio" NAME="manageMultiple" VALUE="N">No </span><span 

styl e= ' col or : bl ack ' xo : px/o : p></spanx/p> 

</td> 
</tr> 
<tr> 

<td width=125 valign=top style='width:93.75pt;background:transparent; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> 

<p class=MsoNormal align=right styl e=' text-align; right 'xbxspan 

styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Ve rdana ; col or : #00003 3 ' >Tax Cl assi f i cati on 

</span></b><span styl e= ' col or : bl ack ' xo : px/o : p></spanx/p> 

<tid^width=475 valign=top style='width:356.25pt;padding:4. 5pt 4.5pt 4-5pt 4.5pt'> 
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<p cl as5=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
col or : #000033 ' xSELECT NAME="busi nessType"> 

<0PTI0N SELECTED VALUE="l">Pl ease Select 

<OPTION VALUE="4">Corporation 

<0PTI0N VALUE="2">individual 

<OPTION VALUE="5">LLC 
<OPTION VALUE="6">LLP 
<OPTION VALUE='7">Non-Profit 
<OPTION VALUE="10">Other 
<OPTION VALUE="3">Partnership 

<OPTION VALUE="8">S-Corp 

<OPTION VALUE="9">Sole Proprietorship 

</SELECT></span><span , ^ . , 

styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red >*</span><span 
styl e= ' font-si ze : 7 , 5pt ; f ont-f ami 1 y : Verdana ; col or : #000033 ' > <br> 
Required for payment purposes </span><span 
styl e= ' col or : bl ack ' ><o : px/o : p></span></p> 
</td> 
</tr> 
<t r> 

<td colspan=2 styl e=' background: transparent; padding: 4. 5pt 4.5pt 4.5pt 4.5pt'> 
<p class=MsoNormal align=center style='text-align:center 'xspan 
styl e= ' font-si ze : 18 . Opt ; f ont-f ami 1 y : Verdana ; col or : #CCOOOO >- - - Contact 
information — -</span> <span styl e=' col or :bl ack "xo: px/o :px/spanx/p> 
</td> 
</tr> 

^<td width=125 valign=top style='width:93.75pt;background:transparent ; 
padding:4.5pt 4.5pt 4,5pt 4.5pt'> . . u 

<p class-MsoNormal align=right styl e=' text-align: right xbxspan 

'-sty'le==-'fi)nt-size:10.0pt;font-family:verdana;color:#000033 >First Name 
</span>^bxspan 

styl e:= ' col o r : bl ack ' xo : px/o : px/spanx/p> 

<td*^width=475 valign=top style='width:356.25pt;padding:4.5pt 4.5pt 4,5pt 4-5pt' 
<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : ve rdana ; 
color :#000033'xlNPUT TYPE="TEXT" SIZE="50" NAME="f i rstName x/spanxspan 
styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >"</spanxspan 
styl e=' font-size: 7, 5pt; font-family: Verdana; color :#0O0O33'> </spanxspan 
styl e= ' col or : bl ack ' xo : px/o : px/spanx/ p> 
</td> 
</tr> 

"^^td width=125 valign=top styl e=' width: 93. 75pt; background: transparent; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> . , , 

<p class=:MsoNormal align=right styl e=' text-align: right xbxspan 
styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ; co I or : #000033 >Last Name 
</spanx/bxspan 

styl e= ' col or : bl ack ' xo : px/o : px/span></p> 

<td^width=475 valign=top style=*width:355.25pt;paddinq:4.5pt 4,5pt 4.5pt 4.5pt' 

<p cl ass=MsoNormalxspan styl e= * font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 

color:#000033'><lNPUT TYPE="TEXT" SIZE="50" NAME="lastName"x/spanxspan 

styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >*</spanxspan 

styl e='font-size: 7. 5pt; font-family: Verdana; color :#000033'> </span><span 

styl e= ' col o r : bl ack ' xo : px/o : px/spanx/p> 

</td> 

</tr> 

<tr> 

<td width=125 valign=top style='width:93.75pt ;background:transparent ; 
padding:4,5pt 4-5pt 4.5pt 4.5pt'> . . , u 

<p class=MsoNormal align^right styl e=' text-align: right xbxspan 
styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ; color : #000033 >E-mai 1 Address 
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</span></b><span 

styl e= ' col or : bl ack ' ><o : px/o : p></span></p> 

<td^width=475 valign=top style='width:356.25pt;paddinq:4. 5pt 4.5pt 4.5pt 4.5pt': 
<p cl ass=MsoNormal xspan styl e= ' font- si ze : 7 . 5pt ; f ont-f ami 1 y : Ve rdana ; 
color:#000033'><INPUT TYPE-"TEXT" SIZE="50" NAME="emai lcl"></span><span 
styl e= • font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >*</span><span 
styl 6= ' font- si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; col o r : #000033 ' > <br> 
<INPUT TYPE="TEXT" SIZE=:"50" NAME=:"emai lC2"></span><span styl e=' font-size: 13. 5pt; 
f ont-f ami 1 y : Verdana ; col or : red ' >*</span><span styl e= ' font-si ze : 7 . 5pt ; 
font-family:verdana;color:#000033'> <br> 

we will send your username and password to this e-mail address. Please type 

e-mail address twice to confirm. </span><span 
styl e= ' col or : bl ack ' ><o : px/o : p></spanx/p> 

</td> 
</tr> 
<tr> 

<td width=125 valign=top style='width:93.75pt ;background:transparent; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> ■ ^ . u 

<p class=MsoNormal align=right styl e=' text-align: right xbxspan 
styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ; col or : #000033 ' >Phone Number 
</spanx/bxspan 

styl e= ' col o r : bl ack ' xo : px/o : p></spanx/p> 

<td^width=475 valign=top style='width:356.25pt;paddinq:4.5pt 4,5pt 4.5pt 4.5pt': 

<p cl as s=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 

col or: #000033 'xINPUT TYPE-"TEXT" SIZE="25" NAME="phoneNumber x/spanxspan 

styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >*</spanxspan 

styl e= • font- si ze : 7 . 5pt ; f on t-f ami 1 y : Verdana ; col or : #00003 3 ' > <br> 

Use numbers only - no dashes, parentheses, etc. </spanxspan 

-Styl es ' cpl or : bl ack ' xo : px/o : px/span></p> 
</td> _ 

</tr> 

<tr> 

<td width=125 valign=top styl e= 'width: 93 .75pt; background: transparent ; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> . . , ^ 

<p class=MsoNormal align=right styl e=' text-align: right xbxspan 
styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ; co I or : #00003 3 >Mai 1 1 ng Add ress 
</span></b><span 

styl e= ' col o r : bl ack ' xo : px/o : p></span></p> 

<td*^width-475 valign=top style='width:356.25pt;padding:4. 5pt 4.5pt 4.5pt 4.5pt' 
<p cl ass=MsoNormal xspan styl e- ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
col or: #000033' XINPUT TYPE="TEXT" SIZE="50" NAME="addressOne x/spanxspan 
styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >*</spanxspan 
style='font-size:7.5pt;font-family:verdana;color:#000033'> <INPUT TYPE= TEXT 
SIZE="50" NAlviE="addressTwo"x/span><span 
styl e= ' col 0 r : bl ack ' xo : px/o : px/spanx/ p> 
</td> 

</tr> 

<tr> 

<td width=125 valign=top style='width:93.75pt;background:transparent; 

padding:4.5pt 4.5pt 4.5pt 4.5pt'> ^. . , , . 

<p class=MsoNormal align=right styl e=' text-align: right xbxspan 

styl e=' font-size: 10. Opt; font-family: Verdana; col or :#000033'>City, State, Zip 

</spanx/b><span 

styl e= ' col or : bl ack ' xo : px/o : p></span></p> 
</td> 




. _ity 

styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >*</spanxspan 
styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; col or : #000033 ' > <br> 
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State <SELECT NAME="state"> 
<0PTI0N SELECTED VALUE="0">Pl ease select 

<OPTION VALUE="AL">ALABAMA 
<OPTION VALUE="AK">ALASKA 
<OPTION VALUE="AZ">ARI20NA 
<OPTION VALUE="AR">ARKANSAS 
<OPTION VALUE="CA">CALIFORNIA 
<OPTION VALUE="CO">COLORADO 
<OPTION VALUE="CT">CONNECTICUT 
<OPTION VALUE="DE">DELAWARE 
<OPTION VALUE="DC">DISTRICT OF COLUMBIA 
<OPTION VALUE="FL">FLORIDA 
<OPTION VALUE="GA">GEORGIA 
<OPTION VALUE="HI">HAWAII 
<OPTION VALUE="ID">IDAH0 
<OPTION VALUE="IL">ILLIN0IS 
<OPTION VALUE="IN">INDIANA 
<OPTION VALUE="IA">I0WA 
<OPTION VALUE="KS">KANSAS 
<OPTION VALUE="KY">KENTUCKY 
<OPTION VALUE="LA">LOUISIANA 
<OPTION VALUE="ME">MAINE 
<OPTION VALUE="MD">MARYLAND 
¥ <OPTION VALUE="MA">MASSACHUSETTS 

<OPTION VALUE="MI">MICHIGAN 
ei <OPTION VALUE="MN">MINNESOTA 
.fi <OPTION VALUE="MS">MISSISSIPPI 
S <OPTION VALUE="MO">MISSOURI 

<OPTION VALUE="MT">MONTANA 
Ul <OPTION VALUE="NE">NEBRASKA 
O <QPTION-VAi.UE="NV">NEVADA 
:S <OPTION YALUE="NH">NEW HAMPSHIRE 
<OPTION VALUE="ND">NEW JERSEY 
<OPTION VALUE="NM">NEW MEXICO 
O <OPTION VALUE="NY">NEW YORK 
^^.J <OPTION VALUE="NC">NORTH CAROLINA 
<OPTION VALUE="ND">NORTH DAKOTA 
<OPTION VALUE="OH">OHIO 
<OPTION VALUE="OK">OKLAHOMA 
CI <OPTION VALUE="OR">OREGON 
U <OPTION VALUE="PA">PENNSYLVANIA 
<OPTION VALUE="PR">PUERTO RICO 
<OPTION VALUE="RI">RH0DE ISLAND 
<OPTION VALUE="SC">SOUTH CAROLINA 
<OPTION VALUE="SD">SOUTH DAKOTA 
<OPTION VALUE="TN">TENNESSEE 
<OPTION VALUE=:"TX">TEXAS 
<OPTION VALUE="UT">UTAH 
<OPTION VALUE="VT">VERMONT 
<OPTION VALUE="VA">VIRGINIA 
<OPTION VALUE="WA">WASHINGTON 
<OPTION VALUE="WV">WEST VIRGINIA 
<OPTION VALUE="WI">WISC0NSIN 
<OPTION VALUE="WY">WYOMING 
<OPTION VALUE="-l">Other 

</SELECT></span><span ^ / 

styl e= ' font- si ze : 13 . 5pt ; f ont-f ami 1 y i ve rdana ; col or : red >*</span><span 
style='font-size:7.5pt;font-family:verdana;color:#000033'> If Other, please 
specify <br> 

<INPUT TYPE="TEXT" SIZE="25" NAME="otherState"><br> ^ 

Zip <INPUT TYPE="TEXT" SIZE="15" NAME="zi p"></span><span style= font-size: 
13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >*</span><span styl e= * font-si ze : 7 . 5pt ; 
f ont-f ami 1 y : Verdana ; col or : #00003 3 ' > </span><span 
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s tyl e= ' col or : bl ack ' ><o : px/o : px/spanx/ p> 
</td> 
</tr> 
<tr> 

<td width=125 valign=top styl e=' width: 93. 75pt; background: transparent; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> 

<p class=MsoNormal align=right styl e=' text-align: right 'xbxspan 
styl e= • font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ; co 1 or : #000033 ' >Count ry 
</span></b><span 

styl e= ' col or : bl ack * xo : px/o : px/spanx/p> 

</td> ^ ^ ^ I 

<td width=475 valign=top style='width:356.25pt;padding:4.5pt 4.5pt 4.5pt 4.5pt 
<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
color :#000033*xSELECT NAME="country"> 

<0PTI0N SELECTED VALUE="0">Pl ease select 

<0PTI0N VALUE="us">united states 

<0PTI0N VALUE="AD">Andorra 

<0PTI0N VALUE="AE">united Arab Emirate 

<0PTI0N VALUE="AF">Afghanistan 

<0PTI0N VALUE="AG">Antigua and Barbuda 

<OPTION VALUE="Ai">Anguilla 

<OPTION VALUE="AL">Albania 

<0PTI0N VALUE="AM">Armenia 

<0PTI0N VALUE="AN">Netherlands Antilles 

<OPTION VALUE="AO">Angola 

<0PTI0N VALUE="AQ">Antarctica 
<0PTI0N VALUE="AR">Argentina 
<0PTI0N VALUE="AS">American Samoa 

<OPTION VALUE="AT">AUStria 
<OPTION VALUE="AU">AUStralia 
<QPTION •VALUE="AW">Aruba 

<0PTI0N yALUE="AZ">Azerbai jan 

<0PTI0N VALUE="BA">Bosnia and Herzegovina 

<0PTI0N VALUE="BB">Barbados 

<0PTI0N VALUE="BD">Bangladesh 

<OPTION VALUE="BE">Belqium 

<0PTI0N VALUE="BF">Burkina Faso 

<0PTI0N VALUE="BG'">Bulgaria 

<0PTI0N VALUE="BH">Bahrain 

<OPTION VALUE="Bi">Burundi 

<OPTION VALUE="BJ">Benin 

<OPTION VALUE="BM">Bermuda 

<0PTI0N VALUE="BN">Brunei Darussalam 

<OPTION VALUE="BO">Bolivia 
<OPTION VALUE="BR">Brazil 
<0PTI0N VALUE="BS">Bahamas 
<OPTION VALUE="BT">Bhutan 

<0PTI0N VALUE="BV">Bouvet Island 

<OPTION VALUE="BW">Botswana 

<OPTION VALUE="BY">BelaruS 

<OPTION VALUE="BZ">Belize 

<0PTI0N VALUE=:"CA">canada 

<0PTI0N VALUE="CC">Cocos (Keeling) islands 

<0PTI0N VALUE="CF">Central African Republic 

<OPTION VALUE="CG">congo 

<0PTI0N VALUE="CH">switzerland 

<OPTION VALUE="Cl">Cote D'lvoire (Ivory Coast) 

<0PTI0N VALUE="CK">cook Islands 

<OPTION VALUE="CL">Chile 
<0PTI0N VALUE="CM">Cameroon 
<OPTION VALUE="CN">china 
<OPTION VALUE="CO">Col ombi a 
<OPTION VALUE="CR">COSta Ri ca 
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<OPTION VALUE="CS">Czechosloval<ia (former) 
<OPTION VALUE="CU">Cuba 

<0PTI0N VALUE="CV">cape Verde 
<0PTI0N VALUE="CX">Christmas island 

<OPTION VALUE=:"CY">Cyprus 

<OPTION VALUE="CZ">Czech Republic 
<0PTI0N VALUE="DE">Germany 

<OPTION VALUE="DJ">Djibouti 
<0PTI0N VALUE="DK">Denmark 
<OPTION VALUE="DM">Dominica 
<0PTI0N VALUE="DO">Dominican Republic 
<OPTiON VALUE="DZ">Algeria 

<OPTION VALUE="EC">ECUador 
<OPTION VALUE="EE">E5tonia 
<OPTION VALUE="EG">Egypt 
<0PTI0N VALUE="EH">western Sahara 
<0PTI0N VALUE="ER">Eritrea 

<OPTION VALUE="ES">Spain 
<OPTION VALUE="ET">Ethiopia 
<0PTI0N VALUE="Fl">Finland 
<OPTION VALUE="FJ">Fiii 

<0PTI0N VALUE="FK">Fa1kland Islands (Malvinas) 
<0PTI0N VALUE="FM">Micronesia 
<0PTI0N VALUE="FO">Faroe islands 
<0PTI0N VALUE="FR">France 

<OPTION VALUE="GA">Gabon 

<0PTI0N VALUE="GD">Grenada 
<0PTI0N VALUE="GE">Georgia 
<0PTI0N VALUE="GF">French Guiana 
<OPTION VALUE="GH">Ghana 
<QPTlON-VALUE="Gl">Gibraltar 
<0PTI0N YALUE="GL">Greenland 
<OPTION VALUE="GM">Gambia 
<OPTION VALUE="GN">Guinea 
<0PTI0N VALUE="GP">Guadeloupe 
<0PTI0N VALUE="GQ">Equatorial Guinea 
<OPTION VALUE="GR">Greece 

<OPTION VALUE="GS">South Georgia and South Sandwich Isls. 
<0PTI0N VALUE=:"GT">Guatemala 

<OPTION VALUE="GU">Guam 

<0PTI0N VALUE="GW">Gui nea-Bi ssau 

<OPTION VALUE="GY">Guyana 

<OPTION VALUE="HK">Hong Kong 

<0PTI0N VALUE="HM">Heard and McDonald Islands 

<OPTION VALUE="HN">Honduras 

<0PTI0N VALUE="HR">Croatia (Hrvatska) 

<OPTION VALUE="HT">Haiti 

<0PTI0N VALUE="HU">Hungary 

<0PTI0N VALUE="lD">lndonesia 

<0PTI0N VALUE="iE">ireland 

<OPTION VALUE="lL">lsrael 

<OPTION VALUE="lN">lndia 

<0PTI0N VALUE="lO">British Indian Ocean Territory 
<OPTION VALUE="lQ">lraq 
<OPTION VALUE="lR'*>lran 
<0PTI0N VALUE="lS">lceland 

<OPTION VALUE="lT">Italy 

<0PTI0N VALUE="JM">jamaica 
<0PTI0N VALUE="JO"> Jordan 
<OPTION VALUE="JP">3apan 
<OPTION VALUE="KE">Kenya 
<0PTI0N VALUE="KG">KyrQy2stan 
<0PTI0N VALUE="KH">Cambodia 
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<0PTI0N VALUE="Kl">Kiribati 

<OPTION VALUE="KM">ComoroS 
<0PTI0N VALUE="K:N">Saint Kitts and Nevis 
<0PTI0N VALUE="KP">Korea (North) 
<0PTI0N VALUE="KR">Korea (south) 

<OPTION VALUE="KW">KUWait 

<0PTI0N VALUE="KY">Cayman islands 
<0PTI0N VALUE="KZ">Kazakhstan 
<OPTION VALUE="LA">La0S 
<0PTI0N VALUE="LB">Lebanon 
<0PTI0N VALUE="LC">saint Lucia 
<0PTI0N VALUE="Ll">Li echtenstei n 
<0PTI0N VALUE="LK">Sri Lanka 
<OPTION VALUE="LR">Liberia 
<OPTION VALUE="LS">LeS0th0 

<0PTI0N VALUE="LT">Lithuania 
<0PTI0N VALUE="LU">Luxembourg 

<0PTION VALUE="LV">Latvia 
<OPTION VALUE="LY">Libya 
<OPTION VALUE="MA">M0r0CC0 
<OPTION VALUE="MC">M0naC0 
<OPTION VALUE="MD">Moldova 

<0PTI0N VALUE="MG">Madagascar 
<OPTION VALUE="MH">Marshall Islands 
<0PTI0N VALUE="MK">Macedonia 

<OPTION VALUE="ML">Mali 

<0PTI0N VALUE="MM">Myanniar 
<0PTI0N VALUE="MN">Mongolia 

<OPTION VALUE="MO">Macau 

<0PTI0N VALUE=:"MP">Northern Mariana islands 
<OPTlON-VAtUE="MQ">Marti ni que 
<0PTI0N i^LUE="MR">Mauritania 
<0PTI0N VALUE="MS">Montserrat 

<OPTION VALUE="MT">Malta 

<OPTION VALUE="MU">Mauritius 
<0PTI0N VALUE="MV">Mal dives 

<OPTION VALUE="MW">Malawi 
<OPTION VALUE="MX">MexiC0 
<OPTION VALUE="MY">Malaysia 
<0PTI0N VALUE="MZ">Mozambique 
<0PTI0N VALUE="NA">Namibia 
<0PTI0N VALUE="NC">New Caledonia 
<OPTION VALUE="NE">Niger 
<0PTI0N VALUE="NF">Norfolk Island 
<0PTI0N VALUE="NG">Nigeria 
<0PTI0N VALUE=:"Nl">Nicaragua 
<0PTI0N VALUE="NL">Netherlands 
OPTION VALUE="NO">Norway 
<OPTION VALUE="NP">Nepal 
<OPTION VALUE="NR">Nauru 

<0PTI0N VALUE="NT">Neutral zone 

<OPTION VALUE="NU">Niue 

<0PTI0N VALUE="NZ">New Zealand (Aotearoa) 
<OPTION VALUE="OM">Oman 
<0PTI0N VALUE:="PA">Panama 

<OPTION VALUE="PE">Peru 

<0PTI0N VALUE="PF">French Polynesia 
<0PTI0N VALUE="PG">Papua New Guinea 
<0PTI0N VALUE=" PH">Phi 1 i ppi nes 
<0PTI0N VALUE="PK">Pakistan 

<OPTION VALUE="PL">P0land 

<OPTION VALUE="PM">st. Pierre and Miquelon 
<0PTI0N VALUE="PN">Pitcairn 
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<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE=' 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTIOM VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE^: 
-<0PTION^VALUE= 
<OPTION JUALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE=: 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE- 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 
<OPTION VALUE= 



af f i 1 i ate_f orm . i nc 

PR">Puerto Rico 

PT">Portuga1 

PW">Palau 

PY">Paraguay 

QA">Qatar 

RE">Reunion 

RO">Romania 

RU">Russian Federation 

RW">Rwanda 

SA">saudi Arabia 

SB">Solonion islands 

5C">seychelles 

SD">sudan 

SE">Sweden 

SG">Singapore 

SH">st. Helena 

Sl">Slovenia 

S3">svalbard and 3an Mayen islands 

SK">slovak Republic 

'SL">sierra Leone 

'SM">San Marino 

'SN">SeneQal 

'SO">Somalia 

'SR">suriname 

'ST">Sao Tome and Principe 
'SU">USSR (former) 
'SV">El Salvador 
'SY">Syria 
'SZ">Swaziland 

'TC">Turks and caicos islands 
'TD">Chad 

'TF">French southern Territories 

'TG">Togo 

'TH">Thailand 

'TJ">Taiiki stan 

'TK">Tokel au 

'TM">Turkmenistan 

'TN">Tunisia 

'TO">Tonga 

•TP">East Timor 

'TR">Turkey 

'TT">Trinidad and Tobago 

'TV">Tuval u 

'TW">Taiwan 

'TZ">Tanzania 

'UA">ukraine 

'UG">uganda 

*UK">United Kingdom 

'UM">US Minor Outlying islands 

'UY">uruguay 

'uz">uzbekistan 

VA">Vatican City State (Holy see) 
Vc">Saint Vincent and the Grenadines 
'VE">venezuela 

'VG">virgin islands (British) 
Vl">virgin Islands (U.S.) 
'VN">viet Nam 
'vu">vanuatu 

'WF">wallis and Futuna islands 

'ws">Samoa 

'YE">Yemen 

'YT">Mayotte 

'YU">Yugoslavia 
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<0PTI0N VALUE="2A">South Africa 
<0PTI0N VALUE="ZM">zambia 
<OPTION VALUE="ZR">zaire 
<0PTI0N VALUE="zw">zimbabwe 

<OPTION VALUE="-l">Other 

</SELECT></span><span ^ . , 

styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col or : red ' >'^</span><span 
sty1e='font-size:7,5pt;font-family:verdana;color:#000033'> if Other, please 

specify <br> ^ , ^ 

<INPUT TYPE="TEXT" SIZE="25" NAME=:"otherCountry"></span><span sty1e= color: 

bl ack ' ><o : px/o : p></span></p> 

</td> 
</tr> 
<tr> 

<td width=125 valign=top style='width:93.75pt;background: transparent; 
padding:4.5pt 4.5pt 4.5pt 4.5pt'> 

<p class=MsoNormal align=right style=' text-align: right xbxspan 
styl e= ' font-si ze : 10 . Opt ; f ont-f ami 1 y : Verdana ; color : #000033 ' >Bi 11 1 ng Name 
</span></b><span 

styl e= ' col or : bl ack ' ><o : px/o : px/spanx/p> 

<td*^width=475 valign=top style='width:356.25pt;paddinc|:4. 5pt 4.5pt 4.5pt 4.5pt' 
<p cl ass=MsoNormal xspan styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; 
color:#000033'xlNPUT TYPE="TEXT" SI2E="50" NAME="billingName x/spanxspan 
styl e= ' font-si ze : 13 . 5pt ; f ont-f ami 1 y : Verdana ; col o r : red ' >*</spanxspan 
styl e= ' font-si ze : 7 . 5pt ; f ont-f ami 1 y : Verdana ; col or : #00003 3 ' > <br> 

AS in, "Make Checks Payable to Squot; </spanxspan style= color: 

bl ack ' xo : px/o : p></spanx/p> 
</td> 

</tr> 

^t r> ' ' ' 

<td coispan=:2 styl e=' background: transparent; padding: 4. 5pt 4.5pt 4.5pt 4.5pt'> 
<p class=MsoNormalx!--[if gte vml l]xv:shapetype id="_xOOOO,t75 
coordsize="21600, 21600" o:spt-'75" o:preferrelative="t" 
path="m@4@51 @4@ll@9®ll@9@5xe" 
filled="f" stroked-"f"> 
<v: stroke joinstyle="miter"/> 
<v:formulas> 

<v:f eqn="if lineDrawn pixel Li newidth 0'V> 

<v:f eqn=*'sum @0 1 0"/> 

<v:f eqn="sum 0 0 @l"/> 

<v:f eqn="prod &2 1 2'V> 

<v:f eqn="prod @3 21600 pixelWidth"/> 

<v:f eqn="prod @3 21600 pixelHeight"/> 

<v:f eqn="sum @0 0 l"/> 

<v:f eqn="prod @6 1 2"/> 

<v:f eqn="prod @7 21600 pixelWidth"/> 

<v:f eqn-"sum @8 21600 0'7> 

<v:f eqn="prod ©7 21600 pixelHeight"/> 

<v:f eqn="sum @10 21600 0"/> 
</v:formulas> 

<v:path o:extrusionok="f" gradientshapeok="t" o: connecttype=: rect /> 
<o:lock v:ext="edit" aspectratio="t"/> ^ ,,,, 

</v:shapetypexv: shape id-"_x0000„il723" type="#_x0000„t75" alt="" 
styl e='width:98.25pt; 
height:1.5pt'> 

<v : 1 magedata src=" . /af f i 1 i ateProgram„f i 1 es/i mageOOl . gi f 
o : href ="http : //merchant . 1 i nksynergy . com/f s/i mages/orange . gi f "/> 

</v:shapex! [endif]--x! [if Ivmllximg width=131 height=2 

s rc=" . /af f i 1 i ateProgram^f i 1 es/i mage002 . gi f " 
v:shapes="„xOOOO_il723"x! [endif]xspan . 

styl e= ' font-si ze : 10 . Opt ; f on t-f ami 1 y : Verdana ; col or : red ' Requi red 
Fi el ds</span></p> 
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</td> </tr> 

<tr><td co1span="2" align="center"><input nanie="submitl" type="submit" 
va1ue="Submit > 

</td></tr> 
</tabl e> 
</form> 
<%end if%> 
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bottom_.inc.inc 

</td> 
</tr> 

<tr align="center"> 

<td> </td><td colspan="2" valign="top" align="center > 
<BR><BR> 

<table width-"100%"> 

<tr> . , „ 

<td height="20" align-"center" class="copynght > 

<a href ="http : //www . el ecti onmal 1 . com/ci ti zensf or" 

target="_bl ank">ci ti zensf or . com</a> 

1 <a href ="http: //www. mypublicservant.com 

tarqet="_bl ank">mypubl i cservant . com</a> 

I <a href ="http: //www. eyardsigns.com 

target^"_blank">eyardsigns.com</a><br> ,^ . • - u i 

<a h ref="http: //www. el ectionmall .com/fund ran si ngbycheck/ 

target="_b1ank">fundraisingbynet.com</a> , ■-,/.. 

I <a href="http : //www. el ecti onmal 1 -com/el ecti one! aw/ 

tarQet="_blank">electionelaw.com</a> ^ 

I <a h ref ="http : //www . el ecti onmal 1 • com/el ecti onshoppi ng/ 

target="_bl ank">el ecti onshoppi ng . com</a> 

I <a href="http://www. electionyellowpages.com 
target="_blank">electionyellowpaQes.com</a><br> _ ^l. ■ / i 

<a href='^mailto:feedback@electionmall .com">Feedback</a> | 

Legal Disclaimer _ ^ . , . . „ 

I <a href="http://www.electionman .com/privacy. htm 

target="_bl ank">Pri vacy Pol i ci es</a><br> 

Copyright <a 

href ="http : //www . el ecti onmal 1 . com">ELECTlONMALL . COM</a> Inc . 2000 

</p> 
</td> 

- • — ^ </tr></table> 
</^> 
</tr> 
</tabl e> 
</div> 
</body> 
</html> 
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<% SBodyl = SBodyl + chr(13) + " </td>" 

sBodyl = sBodyl + chr(13) , , . . . ,., 

SBodyl = sBodyl + chr(13) + " <td width='l' bgcolor=' #000000 'ximg src= + 

SSiteURL + "grfx/black.gif width='l' height=' l'></td>" 
sBodyl = SBodyl + chr(13) + " </tr>" 

sBodyl = SBodyl + chr(13) + " <tr> " . 

sBodyl = sBodyl + chr(13) + " <td width='l' bgcolor=' #000000' ximg 

src="' + SSiteURL + "grfx/black.gif width='l' height='l'></td>" 

SBodyl = SBodyl + chr(13) + " <td colspan='2' align= center 

va1ign=' middle' height=' 10'></td>" ^ u -, • 

SBodyl = SBodyl + chr(13) + " <td width='l' bgcolor=' #000000 'ximg 

src='" + SSiteURL + "grfx/black.gif width='l' height='l'x/td>" 

SBodyl = SBodyl + chr(13) + " </tr> ' 

SBodyl = SBodyl + chr(13) + " <tr>" • 

SBodyl = SBodyl + chra3) + " <td width='l' bgco1or=' #000000 "ximg 

src='" + SSiteURL + "grfx/black.gif width='l' height='l'x/td>" 

SBodyl = SBodyl + chr(13) + " <td colspan='2' heiqht= 1 

bgcolor=' #000000 'ximg src='" + sSiteURL + "grfx/black.gif width= 1 
height='r></td> ^^^^^^ ^ chr(13) + " <td width='l' bgcolor=' #000000 'ximg 

src='" + SSiteURL + "grfx/black.gif width='l' height='l'x/td>" 

SBodyl = SBodyl + chr(13) + " </tr> 

SBodyl = SBodyl + chr(13) + " </table> 

SBodyl = SBodyl + chr(13) 

SBodyl = SBodyl + chr(13) + " </td>" 

SBodyl = SBodyl + chr(13) + " </tr>" 

SBodyl = SBodyl + chr(13) + "</table>" 

SBodyl = SBodyl + chr(13) + "</body>" 

SBodyl = SBodyl + chr(13) + "</html>" 

%> 
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<hl>Contact Us</hl> 
<p><br> 

h ref ="mai 1 to : ManagementTeamOEl ecti onMal 1 . com"><b>ManagenientTeam@El ecti onMal 1 . com</b> 
</a> 

we'^are a team of active leaders in the internet industry. We are political 

advisors, ^ , , . ^ • 

business strategists, political professionals and executives. The domain name 
inspired our co-founders, Ravi Singh and Simer Singh, to form the company in 
early 1999. ElectionMall.com communicates a very powerful idea for the emerging 
field of e-campaigning. Politicians, Professors, Candidates and Citizens are 
part of our management team helping us grow and reach new internet heights, 
we are always looking for new talent, please send us your resume today to <a 

h ref ="mai 1 to : 3obs@el ecti onmal 1 . com"><b>3obs@el ecti onmal 1 . com</b></a> 
<br> 
<br> 

<b>investor Relations </b><br> ^ ^ -^l. 

These are crazy times! ElectionMall.com is a phenomenal concept with endless 
possibilities, if you are a Venture Capital firm, private investor, or just 
a political junkie that feels that you would like to invest please contact us 
today, we are always open to investor proposals- <a - ^ i • n 

href="mail to :lnvestorRelations@El ecti onmal 1 .com"><b>lnvestorRelations@El ecti onmal I .c 

om</b></a> 
<br> 
<br> 

<b>Press Releases</b> <br> ^ 

Freedom of the Press! You got to love it. It allows everyone an opportunity 

to be heard. Electionmall.com has a lot to say. check out our latest Press Release 

today^or^send us yours and we will post it on our site for FREE. Hey, we have 
to hel«- each other out. <a ^ • 

href="mailto:PressReleases@ElectionMall .com"><b>PressReleases@El ecti onMal I .com 

</b></a><br> 
<br> 

<b>Feedback</b> <br> ... ^x- • ^ ^ 

Your comments are very important in helping us provide the most efficient and 

useful political vortal on the internet today. Be honest so we can be the best! 
Email us today. <a . -. - /u / 

h ref ="mai 1 to : FeedbackSEl ecti onMal 1 . com"><b>Feedback@El ecti onMal 1 . com</b></a> 

</p> 
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<% 
%> 



convert_t racki d . i nc 
suser_id = cstrCcdbl (Request. QueryStringC"user"))/2448) 
sTracl<_id = cstr(cdbl (Request. QueryStnngC"id"))/2137) 
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' database. inc 

<% set db = server. CreateObjectC'ADODB. connection") 
pth = Server. mappath ("yardsign.mdb") 

db.open "DRiVER={Microsoft Access Driver C*.mdb)}; DBQ="&pth 

%> 
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del ete„dupl i cate . i nc 
<% SSQL = "DELETE FROM email WHERE emai 1 . emai 1„ID IN 

• List 1 - all rows that have duplicates 
SSQL = SSQL + "(SELECT F. email __ID FROM email AS F " + _ 
"WHERE Exists (SELECT email, list_id, user_id, 
Count (email_lD) " +_ _ -n n- 

"FROM email WHERE email. email = F. email AND email. Ms t„id = 

F.list_id " + _ 

"AND email .user„id = F.user_id GROUP BY email. email, 
email .list_id, email .user„id " + _ 

"HAVING count (emai 1 .email_lD) > 1)) AND email .email _ID NOT 

IN " 

' List 2 - one row from each set of duplicate 
SSQL = SSQL + "(SELECT Mi n(emai 1_ID) FROM email AS F " + _ 
"WHERE Exists (SELECT email, list_id, user_id, 
count (emai IjD) FROM email 

"WHERE email. email = F. email AND email .list_id = F.list_ia 

^ ~ "AND email .user_id = F.user_id GROUP BY email. email, 

email .list_id, email ,user_id " + _ n- 

"HAVING count (email -email _ID) > 1) GROUP BY email, list_.id, 

user_id)" 

'execute SQL 
db. Execute sSQL 

%> 
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sBody = sBody + "<table wi cith= ' 420 ' border='0' censpacing='0' cellpadding='0'>" + 
chrC13) 

SBody = SBody + " <tr> " + chr(13) 

SBody = SBody + " <td width='73'><inig „ 
src= http://www.eyardsigns.com/grfx/cust/imgl.gif ' width='73' height= 62 ></td> + 

chr(13) , . . 

sBody = sBody + " <td width='105'><img . , . , / j 

src='http://www. eyardsigns.com/grfx/cust/img2.gif' width= 105 height= 62 ></td> 

chr(13) . . 

SBody = sBody + " <td width='307'><img , 
src='http://www. eyardsigns.com/grfx/cust/img3.jpg' width= 307 height= 62 ></td> 

chr(13) 

sBody = sBody + " </tr>" + chrC13) 
sBody = sBody + " <tr> " + chr(13) 

sBody = sBody + " <td rowspan='2' valign='tO|?'><Tmg . „ 

src='http://www. eyardsigns.com/grfx/cust/img4.gif' width= 73 height= 278 ></td> 

ch r (13) 

sBody = sBody + " <td width='105' height=' 50'ximg , . • u im. a 

src='http://www. eyardsigns.com/grfx/cust/img5.gif' width='105 height= 50 ></td> 

sBody^= SBody + " <td width='307' va1ign=' middle' height=' 50'xfont 
col or=' #990033 •><b>" + sName + "</b></font></td>" + chr(13) 
sBody = sBody + " </tr>" + chr(13) 

sBody = sBody + " <tr> " + chr(13) . 

SBody = sBody + " <td colspan='2' valign='top > + chr(13) 

sBody = sBody + " <tab1e width='412' border='0' censpacing= 2 

cenpadding='2'>" + chrC13) _ ^ ^ 

SBody = sBody + " <tr> " + chr(13) 

sBody.=,sBody + " <td> " + chr(13) 

3Body = sBt)dy + " <p>6op no more</p> + chr(13) 

sBody = SBody + " <p>vote Democratic Party <br> + chrC13; 

sBody = sBody + " Gore for President<br>" + chrC13), 

sBody = SBody + " Democratic Party is the right choice</p> + chrC13; 

sBody = sBody + " </td>" + chr(13) 

sBody = sBody + " </tr>" + chr(13) 

SBody = SBody + " <tr> " + chr(13) , . ^• 

SBody = sBody + " <td> <font size='2' face=' Verdana, Anal, Helvetica, 

sans-serif '><b><br>" + chr(13) 

SBody = sBody + " <br>" + chr(13) . l. u 

SBody = SBody + " This eyardsign is brought to you by<br> + chrC13:) 

SBody = sBody + " </b></font><img , u • u i^n 

src=' http://www.eyardsigns.eom/grfx/cust/i mg_logo.gif' width='175 height= 31 > 

</td>" + chr(13) , ^ 

sBody = sBody + " </tr>" + chr(13) 

sBody = sBody + " </table>" + chr(13) 

SBody = sBody + " </td>'" + chr(13) 
sBody = SBody + " </tr>" + chrC13) 

SBody = sBody + " <tr> " + chrC13) . 
sBody = sBody + " <td colspan='3' valign='top'> + chr(13). 
sBody = sBody + " <table width='485' border='0' cellspacing= 0 

cellpadding='0'>" + chrC13) 

sBody = sBody + " <tr> " + chr(13) , . ^ , . 

sBody = sBody + " <td width='20%' align=' right 'ximg , 

src='http://www. eyardsigns.com/grfx/cust/leg.gif' width='64 height= 156 ></td> - 

c h p C13 ^ 

sBody = sBody + " <td width='40%'> </td>" + chr(13) 

sBody = sBody + " <td width='20%'><img .... , ^ „ 

src=^ http://www.eyardsigns.eom/grfx/cust/l eg2.gif' width='64' height= 156 ></td> 

ch r (13) 

sBody = sBody + " </tr>" + chr(13) 

SBody = sBody + " </table>" + chr(13) 

SBody = sBody + " </td>" + chr(13) 
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sBody = sBody + " </tr>" + chr(13) 
sBody = SBody + "</table>" + chr(13) 

%> 
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employment. inc 

<a name="top"></a> 
<hl>Empl oyment</hl> 

<p>ElectionMan .com, an exciting funded 

company in beautiful downtown Chicago, co-founded by three successful 
entrepreneurs.. As a team of experienced, high tech professionals, we work 
hard, yet maintain a dynamic and fun environment, in addition we offer the 
opportunity to help grow this campaign in the emerging field of ecampaigning.</p> 

<p >Did you know?</p> 

<B>eCampaigning over the Net </B> 

<p><B>A 35 Billion Dollar Industry per year</B></p> 
<UL> 

<li>63% of the 1998 campaigns used the Internet in some 
way according to Campaigns& elections Magazine; all of the 2000 
presidential candidates use the internet. 

<li>According to CNN, 90 percent of the 48 million 

Americans online are registered voters and 78 percent voted in the last 
election; 

<li >According to the Pew Center, 22 percent of American 

adults have contributed to a political party, candidate or cause in the last 
three years, while 27 percent have contacted a county, state or federal 
elected official in the last four years. 

<li >over 6,000,000 people signed online petitions and 
contributed over 13 mi 11 ion to campaigns online via MoveON.org PAC, showing 
-that the- internet can play a meaningful role in both fundraising and advocacy; 

<LI>The size of the political market is approximately $35 Billion, with $22 
Billion of this amount being spent by political advocacy groups. </Ll></UL> 
<P>So here's your chance to be part of a growing company in the 
growing B2B (business to business) and b2g (business to Government) that knows 
how to work hard and play hard. If you are a smart, enthusiastic and creative 
individual who believes in getting results, send an email message with the <b>job 
title</b> in the subject line and your resume to <A 
href="mailto: jobs@electionmall .com" >jobs@ElectionMall .com.com</A> 
(preferred), or (630) 686-7284. </P> 

<B>Current 
Openi ngs<BR><BR></B></FONT> 
<TABLE border=0 width=582> 
<TBODY> 
<TR> 

<TD width=12> </TD> 

<TD nowrap vAlign^top width=250><!-- product development --> 

<H4> Product 

Devel opment</FONT></H4> 

< p>< FONT s i z e^ - 1>< A 

href="#qalead">seni or/Lead Software QA Engineer</A><BR><A 
href="#qaengr">Software Quality Assurance Engineer</A><BR><A 
href="#infoarch">Senior information Archi tect</A><BR></FONT></P><! -- <A 
href="#engrs">Software Engineers - senior Level </A><br> 

<A href="#endevmgr">Engineering Development Manage r</A><br> 

<A href="#systmleaddev">systems Team Lead Devel oper</A><br> 
<A href="#softconfigmgr">Software configuration 

Management/Tools Engineer</A><br>--><! -- business development --> 

<H4> Business 

Devel opment</FONT></H4> 
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<P><FONT size=-l><A 

href="#verticalaccts">Business Development Manager, vertical ^ „ . _ 
Accounts</A></FONT><BR><!-- <font size="-r'><A href="#sale5dir >Director of 

Sales</A></font><br> . ^ » . . „ ^ o • 

<font size="-l"><A href="#corpbizmgr">Corporate Business 

Development Manage r</A></font><br> ^ _ 

<font size-"-l"><A href=:"#corpaccmgr">Corporate Sal^s 

Manage r </A></f on t><br> 

<font size="-l"><A href="#bizdevmgr">Business 

Development Manage r</A></p></FONT> --><!-- sales --> 
<h4> Sales</F0NT></H4> 

<p><FONT size=-l><A href="#vpsales">VP of 

sal es</A></FONT><BR> 
<P></P></TD> 

<TD width=12></TD> 

<TD nowrap vAlign=top width=250><! -- operations --> 
<P><FONT col or=#3 30066 
><B>Operati ons</B></FONT></P> 
<p><FONT size=-l><A href="#datacenter >Data . „ „ ' ^ 

center Administrator</A></P><!— <font size="-l"><A href="#accsuppassoc >Account 

support Associate</A> <br> _ -. ^ ^- a.-t^ 

<A href="#projmanCRM">Pro]ect Manager, CRM Implementation/Mis 

Tools</A><br></font> . • ^ /a 

<A href="#accsuppassoc">Account Support Associate</A><br> 
<a href="#client">Account Manager, Client Services</a><br> </font></p> 
--><!-- finance and administration --> 
<H4> Finance & 

Admini strati on</FONT></H4><FONT size=-l><A . 
href="#cfo">chief Financial officer</A><BR><A href="#senfinan >sernor Financial 
Analyst</A><BR><!— <A href="#execasst">Executi ve Administrative Assistant</A> 
--x/FOmxl-" marketing --></FONT> 
<H4> Mar'ketinq</F0NT></H4><F0NT 

size=-l><A href="#chanmktman">Channel ^ „ - ^ r. ^ ^ 

Marketing Manager</A><BR></FONT><!— <A href="#assocpm >Associate Product 

Manager</a><br> href="#mktcoordinator">Marketing Coordinator</a> 

<A href="#events">Events Manager</A><br> 
<a href="#partnerma">Partner Marketing Associate</a> 
<a href="#product">Product Manager OEM/Corporate Products</a><br> 
<A href="#directmkt">Direct Marketing Manager</A><br> 
<A href="#prmgr">Public Relations Manager</A><br>--> 

<p></P><!-- processing and distribution --><!— . 

<h4><font color="#330066">Processing and Distribution</font></h4> 

<p><font size="-r'> , , . u 

<A href="#productiontechi">Production Technician l</A><br> 

<!--<A href="#tempprod">Temporary Production 
Operators</A><br> href="#procdistmanager">Processing and Distribution 

Manager</a> ^^^^ href="#productionsuper">Production supervi sor</a> 

</font></p> , . . J 1 ^ 

--x/TDx/TRx/TBODYx/TABLEx!-- product development 

--xFONT 

xA name=qalead> . u ■ i 

<H4xF0NT color=#330066>senior Software Quality Assurance Engineer CTechmcal 
Lead)</F0NTx/H4></AxF0NT si ze=-l> 

<BLOCKQUOTE> . , ^ 

<P>ELetter is committed to maintaining the highest standards of user experience 

with the rapidly expanding ELetter service, which requires a rigorous yet 

efficient engineering process that does not compromise on quality. You will 

provide significant technical leadership to a close-knit, cross-functional team 

with complete ownership of the quality of ELetter's e-commerce web site, 

<BR><BRx/P> 
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<P><B>Responsi bi 1 i ti es</B></P> 
<UL> 

<LI>work closely with software developers to develop, publish, and execute test 

Pl^ns. ^ ^ 

<LI>Lead with technical competence and by example a group of Quality Assurance. 

engineers. , 

<Ll>Assist the SQA Manager in technical decisions and team-building efforts. 
<Ll>Assist in planning product testing strategies and generate quality assurance 

plsns. ^ ^ , , . 

<Ll>Generate detailed test specifications for new features of functional areas. 
<Ll>Design and generate automated test scripts and data sets. 
<Ll>Evaluate and report on software quality and testing progress , 
<Ll>Analyze software changes for testing impact and plan regression tests. 

</LI></UL></BLOCKQUOTE></FONT></FONT> 

<BLOCKQUOTE> 

<P><FONT xFONT 

si ze=:-l><B>Qual i f i cati ons 

</B></ FONTx/ FONTx/ P> 
<UL> 

<LI><F0NT size=-l>BSCS degree (strongly 

preferred), other technical degree or equivalent experience testing e-commerce 
products. </FONT> 

<LI><F0NT size=-l>Minimum of 5 years quality 

assurance testing experience in a structured software quality assurance 

envi ronment . </FONT> 

<LI><F0NT size=-l>Minimum of 1 year 

experience in technical leadership. </FONT> 

<LI><F0NT size=-l>Strong knowledge of 

windows 9x, windows NT and Mac operating systems. </FONT> 

<LI><F0NT size=-l>Strong knowledge of 

Microsoft word, Adobe Acrobat, and other publishing tools is a must. </FONT> 
<li><fon:i- size=-l>Strong knowledge of Excel, 

FoxPro and other spreadsheet/database applications is a must. </font> 
<LI><F0NT size=-l>Strong knowledge of 
internet Browsers is a must. </FONT> 
<LI><F0NT size=-l>Strong knowledge of at 

least 3 of the following: C++, visual Basic, VBscript, JavaScript, ASP, and MS 

SQL. </FONT> 

<LI><F0NT size=-l>Experience in developing 

automation scripts using QA Partner/silk and/or Visual Test is a must. </FONT> 
<LI><F0NT size=-l>Experience in testing MS 

SQL databases and/or COM API's is a plus.</FONT> </li></ul></BLOCKQUOTE><font 
XFONT size=-l> 
<BLOCKQUOTE> 

<P><FONT XFONT size=-lxA 

href="#top"xFONT size==l>Back to 

top</F0NTx/A></F0NT></F0NTx/P></BL0CKQU0TE></F0NTx/FONT><FONT 

xA name=qaengr> . , , . , ^..^ 

<h4><F0NT color=:#330066>Software Quality Assurance Engineer</F0NTx/H4></A><F0NT 

size=-l> , , _ -u ■ 

<BL0CKQU0TE>As a SQA Engineer at ELetter, you can be assured of contributing 
tremendously to the ELetter web site and product line. You will be responsible 
for ensuring the highest quality of ELetter's e-commerce web site, designing 
test plans, automating test scenarios, and verifying SQL database 
queries/results. <BR> 
<PxB>Responsibilities</B> </P> 

<UL> ^ ... 1 

<Ll>you will be part of a very close, cross-functional team with complete 
ownership of the ELetter e-commerce web site. 

<Ll>work closely with developing engineers to develop, publish, and execute test 
plans. , 

<Ll>Assist in planning product testing strategies and generate quality assurance 
plans. 
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<Ll>Generate detailed test specifications for new features of functional areas. 
<Ll>ldentify test areas for the effective use of automated tools and the 
required test data. 

<Ll>Design and generate automated test scripts and data sets. 
<Ll>Evaluate and report on software quality and testing progress. 
<Li>Analyze software changes for testing impact and plan regression tests. 
<Ll>identify, investigate and isolate software problems. 
</Ll></UL><B>Qual i f i cati ons</B> 
<P></P> 

<UL> . ^ 

<LI>BSCS degree (strongly preferred), other technical degree or equivalent 
experience testing e-commerce products. 

<Ll>Minimum of 3 years quality assurance testing experience in a structured 
software quality assurance environment. 

<LI>Strong knowledge of Windows 9x, windows NT and Mac operating systems. 
<Ll>Strong knowledge of Microsoft Word, Adobe Acrobat, and other publishing 
tools is a must. 

<Ll>Strong knowledge of Excel, FoxPro and other spreadsheet applications is a 
must. 

<Ll>Stronq knowledge of internet browsers is a must. 

<Ll>Familiarity with at least 3 of the following: C++, visual Basic, VBscript, 
Javascript, ASP, and MS SQL. . ^/ • n 

<Ll>Experience developing automation scripts using QA Partner/Silk and/or visual 
Test is a must. 

<Ll>Experience in testing MS SQL databases and/or COM API's is a plus. 

</LI></UL> 

<P><F0NT XFONT size=-l><A 

href="#top"><FONT size=l>Back to 

t op</ FONTx/ Ax/ FONTx/ FONTx/ Px/B LOCKQUOTEx/ FONTx/ FONTX FONT 
xA name=infoarch> 

<R4xF0lslT €olor=#330066>Senior information Architect</F0NT><BRx/H4x/A> 

<BLOCKQU0TExFONT size=-lxB>in this job you'll :</B> 

<Px/P> 

<UL> 

<Ll>Get into the minds and hearts of ELetter customers and translate business 

requirements into a truly easy-to-use e-commerce application that reflects the 

ELetter brand. , . 

<Ll>Define site functionality, navigation, interaction, site architecture scheme 

and data flow from flowchart to storyboard to finished interface. 

<Ll>Be a key participant in implementation activities, such as requirements' 

definition and application development. . 

<Ll>Be the primary author of the documentation which serves as the blueprint for 

site development, content management, and QA. 

<Ll>Guide the development of usability testing, analyzing results and 
implementing improvements. Lead a team through the cognitive/functional design 
process. . ^ ^ . 

<Ll>Develop function flows and requirements, create functional design, 
<Ll>Have strong business acumen and strategic analysis capabilities. 
<Ll>Work closely with developers to ensure technology supports proposed 
functionality. 

<Ll>Determine need, hire, monitor, and direct the work of outside consultants 
and vendors as appropriate. 

<Ll>Work collaboratively in an inter-disciplinary team, including members of 
Engineering, Marketing, and Quality Assurance teams. </Llx/ULxB>Necessary 
experience :</B> 
<Px/P> 

<UL> r ^ ' -I • . n 

<LI>4+ years of demonstrated success developing interface design and a minimum 2 
years of direct e-commerce experience (with solid portfolio and URLs). 
<LI>A strong understanding of internet technologies including databases, 
e-commerce, client-server and front-end technologies such as HTML and 
JavaScript. , 
<Ll>Strong knowledge of relationships between content, user interface and 
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technology. 

<Ll>Expert knowledge of interface design processes and methodology and the 
issues particular to internet- related applications. 

<Li>Minimum BA/BS degree in Human Factors, instructional Design, Cognitive 
Psychology or related field, ma preferred. 

<Ll>Demonst rated experimental design/behavioral observation skills including 
strong knowledge of various usability testing methods. 
<Ll>Stronq project management skills, preferably using Microsoft Project. 
<LI>ExcelTent communication skills. 

<Ll>Proven experience in leading and being part of a multi disciplinary team. 
<Ll>Deep appreciation and understanding of how to translate branding into the 
customer experience. </li></UL></font> 
<P><A href="#top"><FONT size=l>Back to 

top</FONT></A> </P></BLOCKQUOTE><! -- business development--><A name=vpsales> 
<h4><F0NT col or=#3 30066 >VP of 
Sales</FONT> </H4></A><F0NT si2e=-l> 

<BLOCKQUOTE> , -n^ 

<p>ELetter has a fantastic opportunity for a VP of sales who wants to build and 
coach an internet startup sales team within a great working environment. As the 
VP of Sales, you will lead our efforts in dominating the Marketing Automation 
market, reporting directly to the CEO.</P> 
<p><B>You will be responsible for:</B></P> 

<UL> . 
<Ll>Building an internal and external sales team and assisting in establishing 
the key benchmarks and measurements of a successful Internet sales model. 
<Li>Hiring and training staff to ensure an excellent standard of customer 
satisfaction. _ . . 

<Ll>Devel oping and implementing sound business strategy, resulting in superior 
business performance. </Ll></UL> 
<P><B>Previous background should include:</B></P> 

<0L> - -^^ - 

<LI>Deve4opi ng and managing relationships with large corporate accounts, 
distributed organizations, franchises, etc. 

<Ll>Experience in Real Estate, Insurance, Financial Services, Healthcare and 
Retail sectors. 

<Ll>Previous startup company experience. . 
<Ll>Demonstrated success in closing multi -million dollar sales deals within the 
services sector. </Li></UL> 

<P>The ideal candidate has the ability to develop and maintain relations in the 
external internet community. Must possess excellent leadership, interpersonal 
and communication skills. Must be a high-energy individual with an excellent 
strength of conviction, a self-confident leader who effectively sells ideas and 
programs, and works well with an over-achieving management group. Must enjoy 
working with a fun and dynamic team of professionals. You will possess an MBA 
and have a minimum of 5+ years as a Director or VP of Sales in a management 
role. </P> 

<P><A href="#top"><FONT si2e=l>Back to 
top</FONT></A></P></BLOCKQUOTE><A name=:verti calaccts> 
<H4><F0NT color=#330066 >Business 

Development Manager, vertical Accounts</FONT> </h4></a><font 

size=-l> 
<BLOCKQUOTE> 

<P>Can you handle the challenge of introducing an innovative Internet service to 
a Corporate Partner Network? ELetter's Business Development Manager will drive 
the company strategy for selling to distributed enterprises and corporations. If 
you think business-to-business e-commerce is where it's at, this is the position 
for you ! </P><B>Responsi bi 1 i ti es</B> 
<P></P> 

<UL> . 
<Ll>Plan, develop and execute the company sales strategy for corporations and 
enterprises. 

<Ll>Manage the complete corporate sales process from initial contact to final 
close. 
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<Ll>Deve1op and leverage vertical channels for corporate customers. 

</Ll></UL><B>Qual i f i cati ons</B> 

<P></P> 

<LI>5 or more years of enterprise and corporate business development or sales 

experience. , . 

<LI>Proven expertise in successfully building and managing national partner 

relationships. 

<Ll>An overachiever with the motivation to put quotas to shame. 
<Ll>Excenent written and verbal communication skills. 

<Li>Proven relationships in real estate and financial services industries. 

</LI></UL> 

<p><A href="#top"><FONT size=l>Back to 

top</FONT></A></P></BLOCKQUOTE><!— operations —XFONT 

><A name=datacenter> , . y . 

<H4><F0NT color=#330066>Data Center Administrator</F0NT></H4></A><F0NT size=-l> 
<BLOCKQUOTE><B>Responsi bi 1 i ti es : </B> 
<P></P> 

<UL> 

<Ll>Ensure communication between printers and servers. 
<Ll>Setup and add new printers to servers (spoolers). 
<Ll>Desktop support for production center. 
<Ll>Add and support users. 

<LI>Purchase small items and supplies needed for production. 

<Ll>High-level system administration for production system, 

<Li>Setup new rendering and spooling machines using ghost. 

<Ll>Report and document jobs to manager.</Ll></UL><B>Qualifi cations :</B> 

<p></P> 

<UL> . ^ 

<Ll>Pursuing a college degree in IS/IT at a Junior or Senior Level or MCSE. 
<£:l>l<hdwledge of ASP, visual Basic, and HTML is a plus. , , 

<LI>Experience in NT 4.0, networking, troubleshooting and support is required. 
<Ll>Experience in LAN/WAN and printer configuration. </LI></UL></FONT><A 
href="#top"><FONT size=l>Back to 

top</FONT></A> 

<p></P></BLOCKQUOTE><!-- finance and administration --xFONT 

><A name=cfo> . , , . - 

<H4><F0NT color=#330066>Chief Financial Officer</FONT><FONT size=-l><FONT 
COlor=#330066> </F0NT></F0NT></H4></A><F0NT si ze=-l></FONT><FONT Size=-1> 
<BLOCKQUOTE> 

<P><B>Primary Duties</B> </?> 

<UL> ^. . . ^ , 

<Li>Provide strategic analysis and advice regarding financial impacts of key 

issues. ^ . . ^ , _, 

<Ll>Manage all corporate financial functions, including budget processes, 

accounting, reporting, MIS systems, legal and HR. 

<Ll>Develop policies and practices regarding financial and the IRS, dealing with 
revenue recognition, capital spending, pricing and terms, and audits. 
<Ll>Participate in the decision and execution of M&A activity, company 
valuation, and acquisition candidate due diligence. , 
<Ll>Prepare and lead the Company through the IPO process. Team with the 
executive committee to define and secure the funding required for the company s 
growth. , 
<Ll>lnterface with the financial community representing the company in 
conferences, analysts' calls, investor presentations and stockholder meetings. 

</LI></UL> 

<P><B>Qualifications</B> </P> 

<Ll>Led a successful IPO as a CFO and/or had several years of solid track record 
in a publicly traded company as a CFO. 

<Li>Have M&A experience. ^ j • ^ 

<LI>Experience in creating strategic and operational plan tor domestic and 
international expansion. 
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<Li>Excel in presentation and communications skills to the investment community. 
IS well respected by wall Street bankers and analysts. 

<Ll>Have at least 10 years experience in running all strategic, operational and 
management aspects of the Finance function within a fast-growth, high-tech 
environment. E-commerce savvy/experience a plus. ^ , 

<LI>B5/BBA in Finance or Accounting. MBA and/or CPA preferred. </LI></UL> 
<P></P> 

<p><A href="#top"><FONT size=l>Back to 

top</FONT></A></P></BLOCKQUOTE></FONT></FONT><A name=senf 1 nan> 
<H4><F0NT color=#330066 >Senior 
Fi nanci al Anal yst</F0NT></H4></A> 

<BLOCKQUOTE><FONT size=-l> . . 

<p>Are you looking for the ultimate challenge? Come ]oin ELetter, a pre-lPO, b2b 
e-commerce company and the leader in online direct mail service. If you believe 
you can do it all, you will have every opportunity to prove that you can walk 
the walk of a Super Financial Analyst .</P><B>Responsibili ties: </B> 
<p></p> 

<Li>Assist VPS to create their organization's budget. Consolidate departmental 

budgets to Company P&L. Track actual and perform variance analyses vs. 

budget vs. revised outlook: Revenue, Spending, Headcount, and Capital 

expenditure. , , . ^ 

<Ll>Assist the Accounting department in the financial reporting system 

conversion to Great Plains. Create various management reports using FRx Report 

Writer. 

<LI>Negotiate with vendors on Company purchases. Review contracts- 
<Ll>Perform ad-hoc financial analysis. </Ll></UL><B>Qualifi cations :</B> 
<p></p> 

<Ll>Self -starter. Ability to solve problems and work proactively. 
<Di>5trdn9- analytical and spreadsheet modeling skills, including macro and VBA. 
Have worked/supported multiple functional organizations: FP&A, Revenue 
planning, Manufacturing, etc. 
<Ll>Excellent communication skills, 

<Ll>5-7 years of financial analyst and reporting expenence. 

<LI>BS/BA required. MBA preferred- </Ll></UL></FONT><A href= #top xFONT 

size=l>Back to top</FONT></A> 
<P></p></BLOCKQUOTE><!-- marketi ng--><A name=chanmktman> 
<H4><F0NT color=#330066>Channel Marketing Manage r</F0NT><BR></H4></A> 
<BLOCKQUOTE><FONT si ze=-l><B>Responsi bi 1 1 ti es</B> 
<p></p> 

<Ll>create channel marketing strategy for vertical accounts (real estate, 
insurance, financial services, etc). . t, ^ ^ 

<Ll>Grow ELetter usage rates within each vertical account using a well 7 rounded 
marketing approach to include print advertising, direct marketing (email and 
direct mail), online advertising, news stories, tradeshows, viral campaigns, and 
telemarketing. , ^, ^ 

<Ll>Lead collateral and sales kit development to support your marketing efforts - 

<LI>work closely with Account Managers and ELetter accounts to devise the best 

marketing strategy for each account. . 

<Li>Develop marketing solution that is repeatable across multiple accounts, 

<Ll>Train internal groups on the marketing process- ^ 

<LI>Construct success metrics. </LI></UL><B>Qualifi cations: </B> 

<p></p> 

<UL> 

<LI>BS Degree or related field experience in Marketing. 

<LI>Minimum 3 years experience in marketing, preferably with an internet 

company. ^ . ^ , . , . ■ ^ 

<LI>Knowl edge of real estate, financial service, and/or insurance markets. 
<LI>Exceptional writing and communication skills. 
<Li>understanding of Marcom needs within a company. 
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<Ll>Soiiie travel required. </Ll></UL></FONT> 
<P><A href="#top"><FONT size=l>Back to 

top</FONT></A> </p></BLOCKQUOTE><!-- processing and distribution --> 
<P></P></FONT></FONT></FONT></F0NT> 
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insertbuttons.inc 

<% 

function insertButtonsC) 

sTrack„id = cstr(cdb1 CsTrack_id) -2137) 
suser = cstr(cdblCsUser)*2448) 

sBody ^ sBody + "<TR><TD colspan='7' a1ign=' center '><BR>" 
sBody = SBody + "<TABLE borer='0' cel1spacing='0' cellpadding^'O' 
width='100%'><TR>" 

SBody = sBody + "<TD colspan='5' al ign=' center 'xfont face=' Verdana, Anal 
size='2'><B>" , _ , . ^ . 

SBody = SBody + "Please show your support by clicking on foMowing 

iconS<BR><BR></B></font></TD></TR><TR>" 

'Headquarters 

sBody = sBody + "<TD width='20%' al ign=' center 
sBody = sBody + "<A target='„b1ank' href='" + sSiteURL + "hdq„form.asp?id-" + 
sTrack„id + "&user=" + suser + '">" ... 

SBody = SBody + "<img src='" + sSiteURL + "grfx/hdq.gif border='0' 
al t= ' Headquarters ' ></A><BR>" 

sBody = SBody + "<font face=' Verdana, AriaV 
si ze= * 1 ' >Headquarters</f ont></TD>" 
'Donate 

SBody = SBody + "<TD width='20%' align='center'>" 
SBody = sBody + "<A target='_blank' href=''' + sSiteURL + "donate_form.asp?id=" 
sTrack_id + "&user=" + sUser + "'>" 

sBody = sBody + "<img src='" + sSiteURL + "grfx/donate.gif border='0 
alt=' Donate '></A><BR>" _ , „ 

SBody = SBody + "<font face=' Verdana, Arial' size=' l'>Donate</font></TD> 
'Volunteer 

SBody - SBody + "<TD width='20%' align=' center 
SBody = sBody + "<A target='_blank' href='" + sSiteURL + 
"v6Tun«er^form.asp?id=" + sTrack_id + "&user=" + sUser + "'>" 

sBod^= sBody + "<iniq src='" + sSiteURL + "grfx/vol unteer.gif' border= 0 
al t= ' Vol untee r ' ></A><8R> 

SBody = SBody + "<font face=' Verdana, AriaT size='l'>Volunteer</font></TD> 
'Send to Freind 

SBody = SBody + "<TD width='20%' align=' center '>" 
sBody = SBody + "<A target='_blank' href="' + sSiteURL + 
"sendtofriend„form.asp?id=" + sTrack_id + "&user-" + sUser + "'>" 

sBody = sBody + "<img src='" + sSiteURL + "grfx/sendtoaf riend.gif border= 0 
alt='send to a Friend'></A><BR>" 

sBody = sBody + "<font face^' Verdana, AriaV size='l'>Send to 
Fri end</f ont></TD>" 
'vote 

sBody = sBody + "<TD width='20%' al ign=' center 
SBody = SBody + "<A target- '„bl an k' href-'" + sSiteURL + "vote_form.asp?id=' + 
sTrack_id + "&user=" + suser + '">" .... 

SBody = sBody + "<img src='" + sSiteURL + "grfx/vote.gif ' border='0 
alt-' Vote '></A><BR>" , „ 

sBody - sBody + "<font face=' Verdana, Arial' size-' l'>Vote</font></TD> 
SBody = SBody + "</tr></table></td></tr></table>" 
end function%> 
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<% set rsl = server. createObject("ADODB. Recordset") 
set rs2 = server. CreateObject("ADODB. Recordset") 

sSQL = "Select a.list„id,a.list_name from list AS a, 
user_list_link AS b WHERE " + _ 

"a.list„id = b.list^id AND (b.user_id = " + session( 'user 
+ " OR b.user_id = 1) order by a.list_„name" 

rsl. Open sSQL,db 

sList = "<0PTI0N value='0'>-select List-</OPTlON>" 
do until rsl. EOF 

SSQL = "SELECT COUNT(*) FROM email WHERE user_id 
+ SessionC"user") + " AND list^id = " + cstr(rsl(0)) 

rsZ.Open sSQL,db 

sNumber = " (" + cstr(rs2(0)) + ")" 
rs2, close 

SList = sList + "<0PTI0N value='" + cstr(rsl(0)) 
"-" + rsl(l) + "'>" + rsl(l) + sNumber + "</OPTlON>" 

rsl.MoveNext 

loop 

'Clean Up 

rsl. Close : set rsl = nothing 
set rs2 = nothing%> 
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set JMail = server. CreateObject("JMail .SMTPMail") 
' This is my local SMTP server 
JMail .serve rAddr ess = "208.233.88.4" 
' This is me 

JMail .sender = "eyardsigns@eyardsigns.com" 
jMail .Subject = request .form("subject") 

jMail .AddRecipient request .form("email") 

DMail .Body = sBody 
JMail . Priority = 3 
' Send it. . , 
DMail .Execute 
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<hl>Management Team</hl> 

<B>Ravi Singh - CEO & Co-Founder</b><BR> 

At the age of 25, Ravi Singh's passion for the Internet became obvious after his 
first run for public office as state Representative in Illinois. Here, he launched 
the first town hall meeting online in Illinois, and became the first Indian to run 
for public office in Illinois. After his political ventures, Ravi was immediately 
hired as Vice-President of a 10-year-old advertising, marketing firm in Chicago. 
Ravi finished his formal education at Marmion Military Academy as a 2nd Lt., and his 
Bachelors of Science at Valparaiso university. He finished his Masters degree from 
Northwestern University, and has lectured on politics and business, internationally. 

Ravi is a true entrepreneur in every sense, in the internet world, he addresses 
the challenges and growing needs of all things political. Ravi has developed and 
managed ElectionMall.com inc., and currently works closely with the president and 
upper management on new business strategies, and the future direction of 
ElectionMall . 

<BR><BR> 

<B>Simer Singh - President & Co-Founder</B><BR> 

in 1996 Simer Singh, the original founder of the .ElectionMall concept, and currently 
Political science major at Loyola university is a living, breathing, example-of this 
generations internet savvy entrepreneurs. Simer was student body president in 
Dunior High, Class President his Freshman Year, and campaign manager of the Next 
Generation for Singh', in Illinois during his brother's bid for State Representative 
in 1997. simer's passion for politics has given him the opportunity to tap into his 
creative and intellectual side, and help run the ElectionMall.com Campaign. This 
young, but mature, individual has coordinated and led the development of this 
venture called ElectionMall.com Inc. from the very early stages of development. As 
the president of ElectionMall inc., Simer has been instrumental in deriving a site, 
which delivers the most innovative and useful political services and information on 
the world wide web. 

^BR^'^BR^ 

<B>Jay 'Sebben - chief Financial offi cer</B><BR> _ , 

Jay sebben is a financial consultant and entrepreneur specializing in technology and 
Internet start-ups- Jay worked in Corporate Development at True North 
communications, one of the world's top ten, largest advertising and media 
consortiums. Prior to joining True North, Jay was part of KPMG s corporate 
Transaction Services group, which provided merger and acquisition related consulting 
for the Information, Communication, and Entertainment group (ICE). Jay als9 worked 
in KPMG's Real Estate Practices group as a senior Auditor. Jay is a Certified 
Public Accountant in the State of Illinois. He graduated with a Bachelor sin 
Business Administration in Accounting with an emphasis in Entrepreneurial Finance 
from the University of Iowa. Jay's extensive background in consulting and finance 
has proven to be the most valuable asset in the ElectionMall.com team. 
^ B R^"^ B R^ 

<B>Kesh Patel - chief Operating Officer & Co-Founder </b><br> _ _ 
A graduate from San Jose state university in Business Administration with an 
emphasis in Marketing and Advertising, Kesh has been an entrepreneur from a very 
early age. Upon graduation Kesh managed a Toys R Us store for two years, and then 
decide to franchise his own business while keeping a keen-eye on the information 
Technology world. While overseeing his business, he joined the marketing team at 
viko Test Lab's in Santa Clara, California, which is m the semiconductor industry. 
Here he helped design and launch the company's web site, and helped develop an 
internal online database and tracking system, with his diverse, solid, marketing 
background and entrepreneurial business strategy experience, Kesh is the perfect fit 
for ElectionMall .corn's corporate management team. Today, Kesh oversees all product, 
services, and technology development initiatives. 
<BR><BR> /. . 

<B>Chris Hohn - Vice-President of Business Development</b><br> 
successfully running over 50 campaigns in the last 10 years, Chris has the 
experience necessary for working in the political arena. An industry expert, he 
graduated from Southern Illinois university with honors in political science.^ He 
has worked for 6 congressional campaigns and 3 presidential campaigns. Chris 
extensive knowledge in political participation, fundraising, grassroots 
organization, and lobbying has earned him high marks with elected officials. He has 
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been recognized by community organizations for his public service work, and has 
currently led the way for e-campaigning in Illinois. Chris' primary goals are to 
define El ectionMall .corn's domestic strategy, as well as identifying, developing, and 
negotiating strategic content and distribution partners. 

<B>Glen Marx - Chief information officer (Cl0)</b><BR> 

Glen Marx graduated from Illinois Business School in 1998 with an emphasis in 
economics and finance. Earlier, Glen was employed by ©wearethesolution.corn, where 
he developed e-commerce strategies as well as networking computer integration, with 
web based applications. He is also the Director of e-commerce Development for 
©wearethesol ution.com. Glen has also been involved in assisting the DuPage county 
politics at a local level in the state of Illinois. Glen brings the 
ElectionMall.com senior management team, a vast amount of leadership skills, 
experience and an innate ability to execute in a timely and professional manner. 

<BR><BR> 

<B> Jesse Piceno - Community Di rector</b><BR> 

A graduate from Valparaiso University in Psychology, Biology and chemistry, Jesse 
has been driven for success. During that period he also served as the president of 
Latinos at Valparaiso University. Jesse also coordinated a political campaign in 
Illinois as the Latino Community Liaison in 1997. Jesse's bilingual expertise has 
allowed him to work in various fields such as the Dryer Medical clinic as an 
Interpreter. Jesse has been recognized by several Hispanic organizati9ns as a role 
model for the Latino American Community because of his leadership, ethical, and 
hardworking qualities. He is also actively involved in community organizations, 
which encourages Latino Americans to participate in the political process. His 
passion to help the community in all aspects such as political, social and 
economical makes him one of the youngest bright stars in ElectionMall .com. 
</p> 
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<SCRIPT LANGUAGE="3avascript"> 

// the array global_article is used to allow multiple categories 
var global^article = new ArrayC) 
var global_article_counter = 0 
var article = null 
var early_exit = 0 

// do not remove this function cloneC) 
function cloneO 

var newwin = window. openC", "clone", "resizable, scrollbars, width=500") 
return true 

// end of do not remove this function cloneO 

</SCRIPT> 

<SCRIPT LANGUAGE=" Javascript" . 
SRC="http : //p . moreover . com/cgi -1 ocal /page?i ndex_uspol i ti cs+] s > 

</SCRIPT> 

<SCRIPT LANGUAGE="Javascript"> 

// load global.article array with articles from cluster 
if (article != null) 

for (var article_counter = 0; article_counter < Math. min(5, article. length) ; 
arti cl e_counter++) 

gl obal_arti cl e [gl obal_arti cl e_counter] = arti cl e [arti cl e_counter] 
|1 obal„arti cl e_counter++ 

} 

else 

- if tearrly_exit == 0) 
{ 

document-writeln("<center>Please reload this page to view the 
head! i nes</center>") 
early„exit = 1 

} ^ 

</SCRIPT> 

<SCRIPT LANGUAGE=" Javascript" . ^, 

SRC="http : //p . moreover . com/cgi -1 ocal /page?i ndex^el ecti on2000+] s > 

</SCRIPT> 

<SCRIPT LANGUAGE=" Javascri pt"> 

// load global_article array with articles from cluster 
if (article != null) 

for (var arti cl encounter = 0; arti cl encounter < Math.min(5,article.length) ; 
arti cl e_coun te r++) 

gl obal„arti cl e [gl obal_arti cl e_counter] = arti cl e [arti cl e_counter] 
^lobal_article_counter++ 

} 

else 

if (early„exit = 0) 

document. writeln("<center>Please reload this page to view the 
headl i nes</center>") 
early_exit = 1 



</SCRIPT> 
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<SCRIPT LANGUAGE="Javascript"> 
if (ear1y_exit == 0) 

van width = "96%" 

var category = 

var numberofarticles = globa1_article. length 

van item^spacing = "5" 

var cluster_bgcolor = "ffffff" 

var cluster_border = "0" 

var heading_di splay = "Yes" 

var time„di splay = "Yes" 

var cen_spacing = "0" 

var cell^padding = "0" 

var heading„bgcolor 

var heading_font 

var heading_font_size 

var heading_fgcolor 

var headline_bgcolor 

var headline_font 

var headline_font_size 

var headline.fgcolor 

var source_font 

var source_font_size 

var source_fgcolor 

var access^font 

var access_font_size 

var access„fgcolor 

var time_font 

var time„font_size 
' var 'timei.fgcolor 

var titne = new Array(global_article. length) 

// Print out the table containing the headlines 
document. writeln("<CENTER><TABLE BORDER="+cluster_border+" 
BGCOLOR='#"+cluster„bgcolor+"' WIDTH=" "+width+" ' CELLPADDING-1 CELLSPACING=0> ) 

document .wri tel n C"<tr><td><center><table bgcolor= ' #"+cl uster_bgcol or+" ' 
CELLPADDlNG="+cell_padding+" CELLSPAClNG="+cen_spacing+" WIDTH='100% > ) 

// Start loop for articles 

for (var counter=0; counter < numberofarticles; counter++) 

// Reset formatting settings to original values 
heading_bgcolor = "ffffff^ 
heading^font = "Verdana" 
heading„font„size = "2" 
heading_fgcolor = "OOGOOO" 
headlinejgcolor = "ffffff" 
headl i ne„f ont = "Verdana" 
headline„font_size = "1" 
headline_fgcolor = "000000" 

source_font = "Verdana, Arial , Helvetica, sans-serif" 
source_font_size = "-2" 
source_fgcolor = "ffOOOO" 

access^font = "Verdana, Arial , Helvetica, sans-serif" 

access_font„size = "-2" 

access_fgcolor - "ffOOOO" 

time_font = "Verdana" 

time_font_size = "-2" 

time_fgcolor = "ffOOOO" 



// Check for new category 
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if ((category != global_article[counter] .cluster) && (heading_di splay == "Yes")) 

// Set current category to new category 
category = global_article[counter] .cluster 

// Print a new category heading 

document. writeln("<TR BGCOLOR='^#"+heading_bgcolor+" '><TD>") 
document. writeln("<FONT SI2E="+heading_font_size+" FACE="+heading„font+" 
COLOR= ' #"+headi ng_f gcol or+" ' > ") 

document . wri tel n ("<B>"-f gl obal _arti cl e [counter] . cl uster+"</B></FONT></TD></TR> ") 
} 

// Print out the headline 

document . wri tel n ("<TR bgcolor= ' #"+headl i ne_bgcol or+" ' xtdxA 
HREF="+global„article[counter] .ur1+" TARGET=_blank>") 

document .wri tel n ("<FONT SlZE="+headl i ne_f ont_si ze+" FACE="+headl i ne_f ont+ 
COLOR= • #"+head1 i ne_f gcol o r+" ' ") 

document. writelnC'>"+global_article[counter] .headline„text+". . .</FONT></A><br> ) 

// Print out the source 

document . wri tel n ("<A HREF="+gl obal_arti cl e [counter] . document_url +" 
TARGET=„blank>") 

document, wri teln("<FONT FACE="+source„font+" siZE-"+source_font_size+ 
C0L0R= ' #"+sou rce„f gcol or+" ' >") 

document. wri tel n(""+global_article [counter] .source+"</FONT></A> ) 

// Print out reg/sub if appropriate 
if (gl obal_article [counter] .access_status == "sub" || 
global_article[counter] .access„status == "reg") 

document .wri tel n(" <A 
HREF= ' "+gl obal^arti cl e [counter] . access^regi strati on+" ' >") 

document .wri tel n ("<FONT FACE="+access_f ont+" Sl2E="+access_f ont_si ze) 
document .writeln(" 

COLOR='#"+access„fgcolor+'">"+global_article[counter] .access_status+ </FONT></A> ) 
} 

// Print out the harvest time 
if (time_di splay == "Yes") 

// Make a new date object 

time[counter] = new Date(global_article[counter] .harvest„time) 

time[counter] .setHours(time[counter] .getHoursO - 
(time[counter] -getTimezoneOffsetO / 60 )) // adjust the time to local 

document .wri tel n ("<FONT FACE="+ti me_f ont+" SlZE="+ti me_f ont_si ze+" 
C0L0R= ' #"+ti me_f gcol or+" ' >") 

document.writeln("  "+time[counter] .tost ring ()+"</FONT> ) 

} 

document .wri tel n ( "</TD></TR><TR BGCOLOR= ' #"+headl i ne^bgcol or+" ' xTD 
BGCOLOR= ' #"+headl i ne_bgcol or+" ' HElGHT="+i tem_spaci ng+"></TD></TR>") 
} // End of article loop 

// start of cloning button code // 

// Note: Do not remove any of the code in this section // 

document. wri tel n("<TR><FORM method^'post' ^ . 

ACTI0N= 'http; //www. moreover.com/cgi-local/wizard_cl one. pi ' target='clone* onSubmit = 
'return cloneO'xTD align='center '>") 

document. writeln("<lNPUT TYPE='hidden' NAME='heading„font„size' VALUE=' -I'xiNPUT 
TYPE=' hidden' NAME=' source„font_size' VALUE='-2'>") 

document, wri tel n("<INPUT TYPE='hidden' NAME='cluster_width' VALUE='280'xiNPUT 
TYPE='hidden' NAME='time„di splay' value=' Yes'>") 
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document. writeln("<lNPUT TYPE=' hidden' name= ' ti me_f ont ' value=' Verdana, 
Arial , Helvetica, sans-serif xiNPUT TYPE='hidden' NAME='cluster_cen spacing' 

VALUE='0'>") ^ . , . 

document. writeln("<lNPUT TYPE=' hidden' NAME='heading_font ' VALUED 'Verdana, 
Arial , Helvetica, sans-serif xINPUT type=' hidden' NAME='number_of_headlines' 
VALUE='10'>") , . , 

document. writeln("<iNPUT TYPE='hidden' NAME='cluster„bgcolor 
VALUE='ffffff xiNPUT TYPE= ' hi dden ' NAME='time_fgcolor' VALUE='#88B55 ) 

document. writelnC'<lNPUT type=' hidden' NAME='access_fgcolor ' 
value='#88b55e'><input type= ' hi dden ' NAME='time„font_size' value='-2 > ) 

document. writelnC"<iNPUT type=' hidden' NAME='headline_bgcolor' ^ 
VALUE^'ffffff xiNPUT TYPE='hidden' NAME='cluste rename' VALUE='index_insurance > ) 

document. writeln("<iNPUT TYPE=' hidden' NAME='access_font„size' value-' -2 'xiNPUT 
TYPE=' hidden' NAME='heading^di splay' VALUED ' Yes' >") 

document. writeln("<iNPUT type=' hidden' NAME='headline_fgcolor 
VALUE=' 000000 "xlNPUT TYPE=' hidden' NAME=' source_font ' VALUE=' Verdana, 
Arial , Helvetica, sans-serif >") ^ , , ^ 

document. writeln("<lNPUT TYPE='hidden' NAME='access_.font' VALUE= Verdana, 
Arial , Helvetica, sans-serif xiNPUT TYPE='hidden' NAME='headline_font_size - 
VALUE='-1'>") 

document. writeln("<INPUT TYPE='hidden' NAME='headline_font ' VALUE='verdana, ^ 
Arial , Helvetica, sans-serif xINPUT TYPE='hidden' NAME='heading_bold VALUE= Yes > 

document. writeln("<INPUT TYPE='hidden' NAME='item_spacing' VALUE='5'><INPUT 
TYPE='hidden' NAME='wizard_brand' VALUE= ' moreover '>") 

document. writelnC"<lNPUT TYPE='hidden' NAME='headinQ_bgcolor ^ 
VALUE-'ffffff XiNPUT TYPE= ' hi dden ' NAME='cl us ter.cell padding' VALUE= 1 > J 

document. wri tel n("<lNPUT TYPE=' hidden' NAME-'headina fqcolor ' 
VALUE=' 000000' XiNPUT TYPE- ' hi dden ' NAME=' source_fgcolor^ VALUE- #88855 > ) 

document. writeln("<lNPUT type- 'hi dden' NAME-'cluster.border ' VALUE- 0 xiNPUT 
TYPE- 'hi dden' NAME-' cluster„layout' VALUE- '<br>'>") 
document . w r i t el n ( " </TDx/ FORM></TR> " ) 

// End of cloning button code // 

document . wri tel n C'</TABLEx/CENTERx/TDx/TRx/TABLE></CENTER>") 



} 

</SCRIPT> 



Page 4 



press, mc 

<font name="Helvetica, Verdana, Arial" size=="2"> 

<p align="center"><B><font face="Arial, Verdana" size="+l">iNTERNET site to change 

ELECTIONS 2000<BR><BR> 

LAUNCH OF ELECTIONMALL.COM<BR> 

AT CHICAGO-KENT COLLEGE OF LAW<BR></font></b> 

<p>chicaQO, IL - Duly 5th, 2000 -Internet independence Day is the 5th of 3uly, with 
the launch of ElectionMall.com at Chicago-Kent College of Law, located at 565 west 
Adams, at 11:00 am in Room C 50. </p> 

<p>El ectionmall.com is the internet's premier campaign/election vortal destination 
for both citizens and their elected representatives. ElectionMall.com unveiled its 
new website serving the demands of e-campaigning.</p> 

<p> "The timing of this launch is perfect, with the 2000 presidential elections 
around the corner. It was a matter of time before internet would change the way 
politics is done in this country. ElectionMall.com is the site that will do- this, 
stated investor. Chairman & Co-Founder, Dr. Chirinieev Kathuna, a , 
telecommunications entrepreneur who co-founded iSP^s m Europe and Asia and recently 
invested in the Mir Space Station.</p> 

<p>Chicago Kent college of Law has teamed up with ElectionMall.com by incubating 
Election-e-law.com, on campaign financing, guidelines and advising in their 
development. "We are excited to play a role in this ground breaking internet site, 
stated Ronald w. staudt. Associate vice President, Law, Business & Technology and 
Professor of Chicago-Kent College of Law.</p> 

<p>"We are revolutionizing the way you campaign over the net.... anyone from student 
body "candidates to the President of the United states can use this application just 
by the c^'ck of a mouse" stated Ravi Singh, Founder and CEO of ElectionMall .com.</p> 




attract, engage and retain clients and customers through collaborative browsing, 
live chat, instant email, call back features and live _ . ^ ^. 

customer profiling, while enhancing the ability of all parties to access information 
pertinent to their interest, "we are confident that with M>webTouch 3.0 
ElectionMall.com will be able to provide the highest level of customer support, a 
defining attribute of ElectionMall .com' s mission," said CEO Fabrice Bourdeix.</p> 

<p>"we want to empower every candidate or elected official with the ability to 
communicate to their constituents over the world wide web," said Simer Singh, 
21-year-old President & Co-Founder of ElectionMall . com. "This internet is new 
medium to communicate with voters not only of my generation but future 
generations. "</p> 

<p><B>About ElectionMall.com Features</B></p> 

<p>The company's goal is to build an audience of politically active citizens, and 
then link them interactively with each other by offering them creative communication 
channels. This will provide their representatives and groups with Fundraising tools, 
website design services and e-commerce shopping cart for campaign. The choice to be 
a politically active citizen and participate in the communication process is an 
offered to visitors by ElectionMall.com. ElectionMall.com will become an integral 
player in the $35 billion dollar annual political market. </p> 

<p>unique to ElectionMall .com is a suite of one-stop campaign features: 
eYardSigns.com, PoliticalFavor.com, ElectionShopping.com, MyPulbicservant.com, 
CitizensFor.com, Fundrai si ngByCheck.com, and ElectionYellowPages.com.</p> 
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<p>Free Email, Chat, Search, Event Calendar, and Bulletin Board features have been 
added to the site, making it a complete one stop approach to the growing demand of 
campaigning services over the internet, "we feel that by doing this, campaign 
managers, grassroots activist, and candidates can use the various features to create 
a cohesiveness that is desperately required in today's campaigns , "explained Chris 
Hohn, Vice President of Business Development. "From my experience of running 
campaigns for the last 10 years, a site like ElectionMall.com is long overdue. "</p> 

<p><B>About MATRAnet, lnc.</b></p> 

<p>MATRAnet provides the means for businesses on the internet to build a trustworthy 
environment as well as bringing that ever-important human touch to electronic 
business. As a global software leader, the company focuses its resources on 
developing comprehensive, sophisticated electronic business solutions that help 
companies give their customers personal attention and service while constantly 
improving business processes. MATRAnet's diverse product line includes M>webTouch, a 
global eCommerce ERM software solution which incorporates features such as customer 
profiling, collaborative browsing, live chat, instant email and call -back features 
to allow you to offer personalized, web-based customer interaction to improve 
customer service and increase customer loyalty and satisfaction. For more 
information, visit their web site at www.matranet .com.</p> 

<p><B>About Chicago-Kent College of Law</b></p> . , ^ , 

<p>Chicago-Kent is the law school of the Illinois institute of Technology and the 
second oldest law school in Illinois. Chicago-Kent College of Law is accredited by 
the American ear Association and is a member of the Association of American Law 
School s.</p> 

<p>35 Billion political spending market, Congressional Quarterly, veronis Suhler& 
Associates, Center for Responsive Politics: Statistical Abstract</p> 
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<DIV class=Sectionl> 
<DIV align=center> 

<TABLE border=0 cell Padding=0 censpacing=0 

style="wiDTH: 375pt; mso-cell spacing: Opt; mso-padding-al t : Opt Opt Opt Opt" 
width=500> 

<TBODY> 

<TR> 

<TD 

Style="PADDING-BOTTOM: Opt; PADDING-LEFT: Opt; PADDING- RIGHT: Opt; PADDING-TOP: Opt 

vAl i gn=top> 

<P><B><FONT color=#990000 face:=Arial size=3><SPAN 

sty1e="C0L0R: #990000; FONT-FAMILY: Arial; FONT-SIZE: 12pt; FONT-WEIGHT: 
bol cl">Expectati on 

of Privacy</SPAN></FONT></B><BR>ElectionMan .com recognize that you expect 
privacy for your personal activities and communications on the web. 
ElectionMan.com understand and appreciate the need to safeguard any information 
you have entrusted with us. ElectionMall.com maintain standards and these 
policies designed to protect your privacy. </P> 
<p><B><FONT color=#990000 face=Arial size=3><SPAN 

style="C0L0R: #990000; FONT-FAMILY: Arial; font-size: 12pt; font-weight: bold">our 
Collection and Use of information about You</SPAN></FONT></B><BR>we collect and 
store information about your online activities on an aggregated (summary) basis, 
we use your information on an aggregated basis to do such things as operate our 
site, enhance our site and sell and deliver advertising and political purpose. 
This information includes such demographic data as the zip codes, ages or gender 
of our users. </P> 

<P><F0NT color=black face="Times New Roman" size=3><SPAN 
style=" FONT-SIZE: 12pt">Any personal information you choose to provide to 
ElectionMall.com will not be disclosed to third parties without your explicit 
cons:ent^ Hpwever, on particular pages where we ask for your personally 
identifiable information, we may explicitly tell you that the data we are 
collecting on that page will be shared with third parties, in which case those 
disclosures shall override anything to the contrary in this policy. For example, 
before you submit answers to questions we ask in an advertiser-sponsored 
promotion, we will tell you that your answers will be shared with that 
adverti ser . </SPAN></F0NT></P> 

<P><F0NT color=black face="Times New Roman" size=3><SPAN 

style=" FONT-SIZE: 12pt">ElectionMall .com has partnered with Moreover, a news and 
group management platform, to bring you portions of this political community 
website. Moreover.com provides the platform for the presentation of some of our 
content, and as such, Moreover.com collects for ElectionMall.com, information 
needed to provide you with the most effective user experience. Moreover.com only 
accesses information about our users on an aggregated basis for site reporting 
purposes. </SPAN></FONT></P> 

<P><B><F0NT color=black face="Times New Roman" size=3><SPAN 
style=" FONT-SIZE: 12pt; font-weight: bold">use of Cookies 

</SPAN></F0NT></B><BR>A cookie is a small amount of data that is sent to your 
browser from a web server and stored on your computer's hard drive. We use 
cookies to deliver content specific to your interests and to save your password 
so you don't have to re-enter it each time you visit our site. However, cookies 
cannot be used to identify individuals, only machines, we may also use an 
outside ad company to display ads on our site. These ads may contain cookies, 
while we use cookies in other parts of our website, cookies received through 
banner ads are collected by our advertising company, and we do not have access 
to this information, some customer data is shared with the advertising companies 
and for political purpose but only in aggregate form. </P> 
<P><B><F0NT color=black face="Times New Roman" size=3><SPAN 
style=" font-size: 12pt; FONT-WEIGHT: bold">Traffic 

data</SPAN></FONT></B><BR>ElectionMall -com may track and aggregate information 
about a visitor's activity into our analysis of general traffic flows at our 
sites (e.g. tracking where traffic comes from, how traffic flows within the 
ElectionMall.com sites, etc.). we share data only on an aggregated basis with 
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our third parties; we will not disclose your individual identity or personally 
identifiable data without your permission, when we do present aggregated 
information to outside companies, no one will be able to identify you or contact 
you. </P> 

<P><B><FONT color=#990000 face=Arial size=3><SPAN 

style="COLOR: #990000; FONT-FAMILY: Arial; FONT-SIZE: 12pt; FONT-WEIGHT: 
bo1cl">Personally 

Identifiable lnformation</SPAN></FONT></B><BR>At your request, we may use your 
personally identifiable information to provide you with personalized 
information, such as newsletters for instance. In those instances where we do 
collect personally identifiable information, you have the option of choosing to 
reveal it to us. </?> 

<p><B><FONT color=black face="Times New Roman" size=3><SPAN 
style=" FONT-SIZE: 12pt; FONT-WEIGHT: bold">Optional 

Registration</SPAN></FONT></B><BR>Our site's registration form requires users to 
give us contact information (like their name and email address) and demographic 
information (like their zip code, age, or income level). We use customer contact 
information from the registration form to send the user information about our 
company. Users may opt-out of receiving future mailings. Demographic and profile 
data is also collected at our site, we will never provide our third parties with 
individually identifiable information about our members unless the member has 
given us explicit permission to do so. </P> 
n <p><B><FONT color=black face="Times New Roman" size=:3><SPAN 

style=" FONT-SIZE: 12pt; FONT-WEIGHT: bold">Optional 
?! Personal ization</SPAN></FONT></B><BR>ElectionMall .com offers news and 
WJ information personalized for you, including where you live and what political 
m issues and people you care about. Users who want to personalize their news and 
m information must provide us with a user ID, zip code, password and a working 
■;f e-mail address. The e-mail address you register with ElectionMall.com will be 
seen by others if you post comments in the public forums of ElectionMall .com. 
O users cit so- have the option of providing us more detailed information including 
m gender, age, political affiliation, and issues they care about, we use this 
information to set up your account and personalize news and information. 
ElectionMall.com may also provide summary or aggregate--no individual--reports 
^ to our third parties who can use this information to determine the effectiveness 

of their media investments, we will never provide our third parties with 
a individually identifiable information about a member unless the member has given 
Hi us explicit permission. </?> 

5f <p><B><FONT color=black face="Times New Roman" size=3><SPAN 
O style=" FONT-SIZE: 12pt; FONT-WEIGHT: bold">Optional Newsletters and send to a 
yk friend" feature</SPAN></FONT></B><BR>Users have the option of receiving a 
newsletter delivered on a regular basis, as well as infrequent other 
announcements from ElectionMall.com. We collect subscribers' e-mail addresses in 
order to distribute those newsletters and announcements and do not otherwise 
share them with other companies or partners, users can choose to unsubscribe 
from ElectionMall.com newsletters at any time by following the unsubscribe 
instructions found in each e-mail or visiting the newsletter sign-up page. </P> 
<P><FONT color=black face="Times New Roman" size=:3><SPAN ^ . ^ 

style=" FONT-SIZE: 12pt">ElectionMall .com also offers an "e-mail a friend about 
this story" feature, allowing site visitors to send e-mail to friends to inform 
them about an article they might be interested in reading, in order for this 
feature to function, we ask for e-mail addresses from the sender and for the 
recipient. We do not store or save these addresses and you will not receive 
e-mailinqs or other communications from ElectionMall.com or its partners as a 
result of having used this feature. </SPAN></F0NT></P> 
<P><B><FONT color=black face="Times New Roman" size=3><SPAN 
style=" FONT-SIZE: 12pt; FONT-WEIGHT: bold">Optional Response to 
Promotion</SPAN></FONT></B><BR>From time to time, ElectionMall.com may sponsor 
sweepstakes, contests or other events which require the collection, processing 
and storage of individual contact and demographic information (e.g., your age 
and state of residence) to be used for the event. We use contact data from our 
contests to send users information about our company. ElectionMall.com may also 
co-sponsor these events along with other companies, in which case the user s 
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individual contact and demographic information is likely to be shared with other 
participating sponsors on an aggregate basis. A registrant's personal contact 
and demographic information will not be released to third party or 
non-participating organizations without the user's consent, and ElectionMal1.com 
will require that co-sponsors of such events uphold the privacy of the 
registrants' information. </P> 

<p><B><FONT color=black face="Times New Roman" size=3><SPAN 
style="FONT-SlZE: 12pt; FONT-WEIGHT: bold">Optional Surveys and 
Poils</SPAN></FONT></B><BR>Users may participate in surveys or polls, users will 
have the option of disclosing their demographic or other personal information, 
such survey or poll<SPAN style="mso-spacerun: yes"> </SPAN>information may be 
compiled and shared in the aggregate with third parties and other third parties, 
but no personal details will be traceable or associated with specific 
individuals. </P> „ . 

<p><B><FONT color=black face="Times New Roman size^3><SPAN ^ ^ . 

style=" FONT-SIZE: 12pt; font-weight : bold">ln Public Bulletin Boards, Chats and 
Other Public Areas</SPAN></FONT></B><BR>Some online activities available through 
our web site, such as including your name and email on a postcard or 
participation on a bulletin board, do require you to include your personally- 
identifiable information. Participation in these on-line activities is 
voluntary. Please remember that any information that is disclosed in these areas 
becomes public information and you should exercise caution when deciding to 
disclose your personal information. Be aware that because the areas are public, 
people may contact you as a result of your posting your contact information in 
the public areas. Should you receive unsolicited communications which you do not 
wish to receive, we advise you to contact the senders of the message directly 
and request not to be contacted. ElectionMall .com cannot control what users post 
publicly, nor the behavior of people who may collect information made public, 
but we will do our best to assist a user should the user receive unsolicited 
mail from other ElectionMall .com members. </P> 
<p><B><FONT color=#990000 face=Arial size=3><SPAN 

style="C©LOR: #990000; FONT-FAMILY: Arial; FONT-SIZE: 12pt; FONT-WEIGHT: 
bold">Protect . . , . 

Your information</SPAN></FONT></B><BR>This site has security measures in place 
to protect the loss, misuse and alteration of the information under our control, 
we use industry- standard efforts to safeguard the confidentiality of your 
personal identifiable information, such as firewalls and secure socket Layers 
where appropriate. </P> . 
<P><B><FONT color=black face="Times New Roman size=:3><SPAN 
style=" FONT-SIZE: 12pt; FONT-WEIGHT: bold">Links to Other 
Sites</SPAN></FONT></B><BR>This site contains links to other sites. 
ElectionMall.com is not responsible for the privacy practices or the content ot 
such web sites. For instance, if you choose to make a purchase through an online 
store or service linked from ElectionMall.com, be aware that any information 
given, such as a credit card number or home address, will be received by the 
company operating the store. Different rules may apply to their use or 
disclosure of the personal information you disclose to them, we encourage you to 
investigate and ask questions before disclosing information to third parties. 

<P><B><FONT color=black face="Times New Roman 5ize=3><SPAN 
style=" FONT-SIZE: 12pt; FONT-WEIGHT: bold">Limitations 

</SPAN></FONT></B><BR>ElectionMall .com will not otherwise use or disclose your 
personal information without your consent except (i) as described m this 
privacy policy, or (ii) as required by law, court order or as requested by other 
government or law enforcement authority. This policy does not protect 
information you post to any on-line bulletin board, chat room, newsgroup or 
other public forum within our websites. Additionally, in the event of unlawful 
interception or access of transmissions and private communications, there may be 
a risk to your privacy, in the event of a complaint, we may also receive 
personally identifiable information about you from other parties in our site or 
from other users or third parties who may communicate information to us about 
you in relation to that complaint. </P> 
<P><B><FONT color=#9900Q0 face=Arial size=3><SPAN 
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style="COLOR: #990000; FONT-FAMILY: Arial; FONT-SIZE: 12pt; FONT-WEIGHT: 
bo1d">Respecting 

Your choice</SPAN></FONT></B><BR>Our site provides users the opportunity to 
opt-out of receiving communications from us and our partners when the user first 
provides information to us or at any subsequent time. If a user has explicitly 
authorized ElectionMall.com to provide personally identifiable information to a 
third party, a request not to receive any communication from such third party 
should be directed to ElectionMall .com.at <A 

href="mailto:support@ElectionMan .com.com">support@ElectionMall .com</A>. </P> 
<p><B><FONT color=#990000 face=:Arial size=3><SPAN 

style=:"COLOR: #990000; FONT-FAMILY: Arial; FONT-SIZE: 12pt; FONT-WEIGHT: 
bol d">El ecti onMal 1 . com 

Internet Safety Tips </span></font></b></p> 
<0L type=a> 

<LI class==MsoNormal ^ _. n 

style="mso-margin-top-alt: auto; mso-margin-bottom-alt : auto; mso-nst: 10 I eve II 
Ifol; tab-stops: list 36.0pt"><FONT 

face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt' >Kee5 your passwords 
private. No one else needs to know. No customer representative from 
ElectionMall.com will ever ask you to reveal your password, </SPAN></FONT> 
<LI class=MsoNormal ^ ^, nr. n 

style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto; mso-list: 10 levell 
Ifol; tab-stops: list 36.0pt"><FONT 

face="Times New Roman" size-3><SPAN style=" FONT-SIZE: 12pt">Protect your privacy 
by using only your ElectionMall .com member name and/or e-mail address when 
chatting or sending e-mail. Take advantage of your free ElectionMall -com email 
for your civic activities on-line. </SPAN></FONT> 

<LI class=MsoNormal ^ -i^. n i-i 

style="mso-margin- top-alt: auto; mso-margin-bottom-alt: auto; mso-list: lO levell 
Ifol; tab-stops: list 36. Opt "xFONT u u-, ^ 

face="TimeS New Roman" size=3><SPAN style=" font-size: 12pt >Think carefully and 
exercise'^caution when planning to meet online "friends" in person, choose a 
public place (cafe, library, etc.) or bring companions. </SPAN></FONT> 
<LI class=MsoNormal 

style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto; mso-list: 10 levell 
Ifol; tab-stops: list 36.0pt"><FONT „ . 

face="Times New Roman" size=3><SPAN style-" FONT-SiZE: 12pt">Think carefully 
before you give out personal information such as your name, address, or phone 
number in any of the public areas on the site. </SPAN></FONT> 
<LI class=MsoNormal ^ n 

style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto; mso-list: 10 levell 
Ifol; tab-stops: list 36.0pt"><FONT ^ 
face="Times New Roman" size=3><SPAN style=" FONT-SIZE: 12pt >Always delete 
unknown e-mail attachments before opening them. They may contain destructive 
computer viruses. </SPAN></FONT></LI></OL> 

<P class-MsoNormalxBxFONT color=#990000 face=Arial size-3><SPAN 
style="COLOR: #990000; FONT-FAMILY: Arial; FONT-SIZE: 12pt; font-weight: bold >we 
Will Notify YOU Of Any changes</SPAN></FONT></B><BR>This policy may be revised 
over time as new features are added to the web site. We will post those changes 
prominently so that you will always know what information we gather, how we 
might use that information, and whether we will disclose it to anyone. Please 
check this site for information about revisions to our privacy policy. </P> 
<P><B><FONT color=#990000 face^Arial size=3><SPAN 

style="COLOR: #990000; FONT-FAMILY: Arial; FONT-SIZE: 12pt; FONT-WEIGHT: 
bold">Answering 

Your concerns</SPAN></FONT></B><BR>We hope this policy clarifies our procedures 
regarding your personal information. At ElectionMall .com, we encourage you to 
learn as much as you can about your privacy on the internet. If you have any 
questions about this privacy statement, the practices of this site, or your 
dealings with this web site, you can contact: </P> 

<P class-MsoNormal style="MARGlN-LEFT: 36pt"><FONT face="Times New Roman 
size=3><SPAN style=" FONT-SIZE: 12pt">support Manager<BR>ElectionMall .com<BR>500 
North Michigan Ave</SPAN></FONT></P> 
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<P class=MsoNormal style="MARGiN-LEFT: 36pt"><FONT face="Times New Roman" 

size=3><SPAN style="FONT-SlZE: 12pt">Suite 1015</SPAN></FONT></P> 

<P c1ass=MsoNormal style="MARGlN-LEFT: 36pt"><FONT face="Times New Roman" 

size=3><SPAN style=" FONT-SIZE: 12pt">Chi cago, Illinois 

60611<BR>Support®ElectionMal1 .com<FONT color=black><SPAN 

styl e="COLOR: 

bl ack"><0 : px/o : p></SPAN></FONT></SPAN></FONT></P></TD></TR></TBODY></TABLE></DIV> 

<p align=center style="TEXT-ALlGN: center"><FONT color=black 
face="Times New Roman" size=3><SPAN 

styles" FONT-SIZE: 12pt"> <o:p></o:p></SPAN></FONT></P> 

<P class=MsoNormal><FONT face="Times New Roman" size=3><SPAN 

styl e=" FONT-SIZE: 12pt"> <o:p></o:p></SPAN></FONT></P></Dlv> 
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<% 

If SessionC'user") = then 

SessionC"time„out") = "true" 

response-write "<SCRIPT 1anguage=' JavaScript + chr(13) 
response. write "window.location=nogin.asp' " + chr(13) 
response. write "</SCRiPT>" 

else 

session. timeout = 120 

end if 

%> 
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<link rel="stylGsheet" type="text/css" href="e1ectionmall .css% 
<scri pt LANGUAGE="3ava5cri pt"> 



if (document. i 
cyclegraphi 
cyclegraphi 
cyclegraphi 
cyclegraphi 
cycl egraph" 
cyclegraph 
cycl egraph 
cyclegraph 
cyclegraph 
cyclegraph 
cyclegraph 
cyclegraph 
cyclegraph 



} 



mages) { 

cO = new Image () ; 
cO.src = "rollover/blue. gif"; 
cl = new Image O; 

cl.src = "rollover/blueyellow.gif"; 
c2 = new imageQ; 
c2.src = "rollover/blueyellow.gif 
c3 = new image Q ; 

cS.src = "rollover/blueyellow.gif"; 
c4 = new image () ; 

c4.src = "rollover/blueyellow.gif": 
c5 = new Image (); 

cS.src = "rollover/blueyellow.gif" 
.^y, = new imageO; 

cyclegraphicG.src = "rollover/blueyellow.gif" 

cyclegraphic? = new imageO; 
cyclegraphic7.src = "rollover/blueyellow.gif"; 
cyclegraphicS = new imageC); 
cyclegraphicS.src = "rollover/blueyellow.gif ; 



function graphicO_off (imgName) { if (document. i mages) { 
document [imgName] .src = cyclegraphicO.src 

} 

functionrgraphicl„on (imgName) { 
if (document. images)! 

document [imgName] . src = cyclegraphicl.src; 

} 

} 

function graphic2_on (imgName) { 
if (document -images)! 

document [imgName] .src = cycl egraphicZ. src; 

} 

} 

function graphic3_on (imgName) { 
if (document .images)! 

document [imgName] .src = cyclegraphicS.src; 

} 

} 

function graphic4_on (imgName) { 
if (document. images)! 

document [imgName] . src = cyclegraphi c4. src; 

} 

} 

function graphic5„on (imgName) { 
if (document .images)! 

document [imgName] .src = cyclegraphicS.src; 

} 

} 

function graphic6„on (imgName) { 
if (document. images)! 
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document [imgName] . src = cyclegraphic6.src; 

} 

function graphic7_on (imgName) { 
if (document -images)! 

document [imgName] .src = cyclegraphic7.src; 

^ } 

function graphic8_on (imgName) { 
if (document. images)! 

document [imgName] . src = cyclegraphicS. src; 

} 

} 

var pwin = null 

function portWin(url, x, y) { , . . i 

pwin = window. open (url , 'newwin', 'width= + x + , heights + y + 

' , scrol 1 bars=yes , status=yes ,menubar=no ' ) 
if (window. pwin) pWin.focusO 

} 

//--> 
</script> 

<SCRIPT Language="DavaScript" 

src="http : //www. el ecti onma 1 1 . com/src/chat . j s"></SCRlPT> 
</head> 

<body bgcolor-"#FFFFFF" topmargin="0" leftmargin="0" marginheight=:"0" 
marginwi dt1i="0"> 
<Div ali'Qn=:center> 

<table width="760" border="0" cellspacing="0" cenpadding= 0 > 

"^^^td ximg src="grfx/eyard_imgl.gif " width="92" height="79"></td> 
<td colspan="2" align="center"> 

<%Set ad = server. createObject("MSWC.AdRotator ) %> 

<%= ad.GetAdvertisement("inc/adrot_lng.txt") %> 

<td^valign="top" class="topnav" bgcolor="FFC926" width="20%"> 

&nbsp ; &nbsp ; &nbsp ; <a 
href="http://www.electionmall -com/">Electionmall .com</a><BR> _ i. , 

&nbsp ; &nbsp ; &nbsp ; <a h ref ="http : //www . el ecti onmal 1 . com/fund rai si ngbycheck/ 
>Fundrai si ngbynet . com</a><BR> 

   <a 
h ref =" htt p : //www . el ecti onyel 1 owpages . com/">El ecti onyel 1 owpages</a><BR> 

   <a _ „ n. - ^ / 

href =" htt p : //www . el ecti onmal 1 - com/pol i ti cal f avor">Pol i ti cal Favor . com</a><BR> 

&nbsp ; &nbsp ; &nbsp ; <a 
href ="http ; //www. mypubl i cservant . com">MyPubl i cServant . com</a><BR> 

   <a . u ■ / 

href ="http : //www . el ecti onmal 1 • com/el ecti onshoppi ng/ >El ecti onShoppi ng . com</a> 
</td> 
</tr> 

<tr valign="top"> <form ^ . . 

action="http://www.electionmall .com/search/searchresult.asp method= post > 



'normal "ximg 
width="345" 



coords="46,3,104,30" href="iavascript : openchat()"><area shape= rect 
coords="107 , 5 , 204 , 32" href ='^^http : //www . el ecti onmal 1 . com/pol i ti cal favor/ 
target="_blank"><area shape="rect" coords="212,4,285,26" 
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href ="http : //www . el ecti onmal 1 . com/el ecti onshoppi ng/" target="_bl ank"><area 
shape="rect" coords="3,6,54,24" . , n u-. , " / 

href ="http : //www . el ecti onmal 1 . com/mai 1 /publ i cl ogi n . htm targets „bl ank ></map> 
<nobr> 

<select name="searchNlD" > 
<option value=615320>Media</option> 
<opti on val ue=615 310>MP3</opti on> 
<option value=615316>usenet</option> 
<opti on val ue=615312>Heal th</opti on> 
<option val ue=615319>Pol i ti cs</opti on> 
<option val ue=615313>Sports</option> 
<opti on val ue=615314>Ki ds</opti on> 
<opti on val ue=615323>Educati on</opti on> 
<opti on val ue=615322>Busi ness</opti on> 
<option value=615321>Sciences</option> 
<option value=615309 selected>The web</option> 
</select> 

<font si2e="l" color="#FFFFFF">For 

^onput type="text" size="6" name="searchQuery" value=";; maxlength=;;io;; > 
<input type="hidden" name="site" value= eyardsign" maxlength- 10 > 
<input type="hidden" name="url" , 
val ue="http : //mypubl i cservant . search . everyone . net/search/search/SearchResul ts > 
<input type="submit" name="newSearch" value="Go"></nobr> 
</td> 
</form> </tr> 
</tabl e> 

<table width='760" border="0" cellspacing="0" cellpadding="0"> 

<td T»eight="6"></td> 
<tr height="6"></td> 
<td height="6"></td> 
</tr> 

^^<td width-"148" valign="top"> 

<table width="148" border="0" cellspacing="0" cell padding- 0 > 
<tr> 

<td width="3"></td> . , , ^ . ^ „^,„ 

<td width="13"><img src="rollover/blue,gif" width="13" height- 13 
name="cycl egraphi cl"></td> 

rn true;" 

return true;"><img 

ird_home . gi f " borde'r="0"></a></td> 

</tr> 

^^<td width-" 3" height-" 3 "></td> 

<td width-"13" heiQht="3"></td> 

<td width="132" height-"3"></td> 
</tr> 
<tr> 

<td width="i3%<im^ src-"rollover/blue.gif " width-"13" height-"13" 
name="cycl egraphi c2"></td> 

<td width="132"><a href-"aboutus.asp" 

■ ' - " . - . '';return true; 

'About us ' ; return 
</a></td> 

</tr> 

^ <td width="3" height="3"></td> 
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<td width="13" height="3"></td> 

<td width="132" height="3"></td> 
</tr> 
<tr> 

<td width="3"></td> , „_„ 

<td width="13"><inig src="ronover/blue.gif ' width="13" height="13" 
name="cycl egraphi c2"></td> 

<td width="132"><a href="volunteering.asp 

■■ - - ■ • -.^ ---1- ''^return true;" 

unteering' ; return 
border='*0"></a></td> 

</tr> 

^^<td width="3" height="3"></td> 

<td width="13" height="3"></td> 

<td width="132" hefght="3"></td> 
</tr> 

<td width="3"></td> „ , . , „/^„ 

<td width="13"><img src="ronover/blue.gif ' width="13" height='13 
name="cycl egraphi c3"></td> 

<td width="132"><a href="news.asp" 

■ - - . ■ -^.^ ■ . . _ - '■ ^ return true; 

itical news' ;return 
border="0"></a></td> 

</tr> 

^^<td width="3" heiqht="3"></td> 
<td width="13" heights" 3 "></td> 
• ' <td width="132" height="3"></td> 

— </tr> 
<tr> 

<td width="13"><inig src="ronover/blue.gif" width="13" height="13" 
name=" cycl egraphi c4"></td> 

<td width="132"><a href="affi liate.asp" 

■ ■ * ■ - ' ' * ■ ^ ■ ' "^iTij«;= ■ • : rsTurn true ; 

. _ jrams' ; return 
r="0"></a></td> 

</tr> 

^^<td width="3" height="3"></td> 

<td width="13" height="3"></td> 

<td width="132" height="3"></td> 
</tr> 
<tr> 

<td width="13"><img src="ronover/blue.gif' ' width="13" height="13" 
name="cycl egraphi c5"></td> 

. ... href="eraplovment.j 

.st:atus=' '; return true; 
. status= ■ Empl oyment ' ; r etu rn 
JO" height="13" border="0"></a></td> 

</tr> 

^*<td width="3" height="3"></td> 
<td width="13" henght="3"></td> 
<td width="132" he?ght="3"></td> 
</tr> 
<tr> 

^td width="13"><img src="ronover/b1ue.gif" width="13" height="13" 
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name="cycl egraphi c4"></td> 

<td width="132"><a 
h ref =" j avascri pt : po rtwi n ( ' f 1 as/tutf 1 ash . htm ' , 620 , 43 5) " 
onMouseOut="qraphi cO_of f ( ' cyclegraphi c4 ' ) ;wi ndow. status= ' ' ; return true ; " 
onMouseOver= graphic4_onC'cyclegraphic4') ;window.5tatus='How it works' ; return 
true;"><img src="grfx/neweyard_howitworks .gif " border="0"></a></td> 
</tr> 

^^<td width="3" height="3"></td> 

<td width="13" heiqht-"3"></td> 

<td width="132" height="3"></td> 
</tr> 

<td width="3"></td> „ , . . 

<td width="13"><img src="ronover/blue.gif" width="13" height="13" 
name="cycl egraphi c7"></td> 

<td width-"132"><a 




</tr> 

^^Sd width="3" heiQht="3"></td> 

<td width="13" heiqht=:"3"></td> 

<td width="132" he?ght="3"></td> 
</tr> 
<tr> 

<td width="3"></td> _ , , , ^ , ^ „_,^„ 

<td width-"13"><img src="ronover/b1ue.gif " width="13" height= 13 
name="cycl egraphi c6"></td> 

<td width="132"><a href="eyard„advertise.asp 
onMouseOut="graphicO_off('cyclegraphic6') ;window.status=' return true; 
onMouseOver='^graphic6_onCcyclegraphic6');window.status='Advertise with us ; return 
true;"><img src-"grfx/eyards_advertise.gif" width="108" height="13" 
border="0"></a></td> 
</tr> 

^^<td width="3" heiqht="5"></td> 

<td width="13" heights" 5 "></td> 

<td width="132" height="5"></td> 
</tr> 
<tr> 

"^td width *'3**^'^/td^ 

<td width="13"><img src="ronover/b1ue.gif" width="13" height="13" 
natne="cycl egraphi c8"></td> 

<td width="132"><a href="contactus.asp" 

:atus=" ; return tru 

return 




border="0"></a></td> 
</tr> 

<%if not sessionC'user") = "" then%> 

^^<td width="3" height="5"></td> 

<td width="13'" height="5"></td> 

<td width="132" height="5"></td> 
</tr> 

<td width="3"></td> . . , ^ . ^ 

<td width="13"><img src="ro11over/b1ue.gif" width= 13 height= 13 
name="cycl egraphi c8"></td> 

<td width="132"><a href="register.asp" 
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.status=" ; return true; 
.status='My Profile' ; return 
'></a></td> 

</tr> 

^^<td width="3" height="5"></td> 

<td width="13" heiqht="5"></td> 

<td width="132" height="5"></td> 
</tr> 
<tr> 

<td width="3"></td> , , . „ „ 

<td width="13"><img src="rollover/blue.gif' ' width="13" height= 13 

name="cyclegraphic8"></td> 

<td width="132"><a href="1ogout.asp" ... 

onMouseOut="graphicO_off('cyclegraphic8'^);window.status= ; return true; 

onMouseOver=^graphic8_onC'cyclegraphic8');window.status= Log out ; return true, 

src="grfx/l ogout.gif" border="0"></a></td> 
</tr> 

<%end if%> 

^^<td width="3" height="5"></td> 

<td width="13" height="5"></td> 

<td width="132" height="5"></td> 
</tr> 
<tr> 

<td width="3"></td> „ , l,^^„u^. ..i,.. 

<td vyidth="13"><img src="ronover/blue.gif" width= 13 height= 13 

name="cyclegraphic8"></td> . -, n ■ •^" 

<td width="132"><a href="javascript:a1ert('Corjn ng soon. ) 

onMous,eQut= 
onMouseOvet 
true;"><Tm(, 

</tr> 
</table> 
</td> 



<td width="132"><a href="javascript:a1ert('Coming soon.*)" 
>useQyt="qraphi cO_of f (' cycl egraphi c8 ' ) ;wi ndow. status^ ; return true ; 
^ seove f=^g raphi c8_on C ' cycl eg raphi cS') ; wi ndow . status^: * Live He! p ' ; ret u r n 
s;"><Tmg src-"grfx/eyard„livehelp.gif" border= 0 ></a></td> 
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<% SBody = "<html><head>" 

SBody = "<title>eYardSign</title>" 
sBody = "<body>" 
if bFault then 

sTrack_Rnd = cstrCcdbl (sTracl<_id)*2137) 

sUser_Rnd = cstr(cdbl (suser)*2448) 

SBody = sBody + "if the evardsign below does not show up correctly, 

click here: " 

SBody = SBody + "<a ...» 
href=www.eyardsigns.com/preview_yardsign.asp?id=" + sTrack_Rnd + &user= + 

sUser_Rnd + > ^^^^^ ^ sBody + "http://www.eyardsigns.com/preview_yardsign.asp?id=" 
+ sTrack_Rnd + "&user=" + sUser_Rnd + "</a>" 
sBody = sBody + "<BR>" 
end if .. 

sBody = sBody + chr(13) + "<BGSOUND 

sBody = sBody + chr(13) + "src="' + sSiteURL + sMusic + 
sBody = sBody + chr(13) + "autostart='true'><embed hidden=true 
sBody = SBody + chr(13) + "src=" + sSiteURL + sMusic + 
sBody = sBody + chr(13) + "autostart='true'>" 
sBody = sBody + chr(13) 

sBody = sBody + chr(13) + "<table width='550' border='0' censpacing='0' 
cenpadding='0'>" 

SBody = SBody + chr(13) + ' <tr> . 

sBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= + 
SSiteURL + "grfx/black.gif width='i; height='l'></td>" . 

sBody = sBody + chr(13) + "<td colspan=;2' height= 1 
bgcolor='#000000;_ximg src='" + sSiteURL + "grfx/black.gif width= 1 

^V^'^^Z}./'^^^^ = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src='" + 
sSiteURL-+ "grfx/black.gif width='l' height='l'x/td>" 
sBody = sBody + chr(13) + ||</tr>" 

^^sBody =^sBody +^chr(i3) +^"<td width='l' bgcolor=' #000000 'ximg src='" + 
SSiteURL + "grfx/black.gif width='i; height=' l'></td>" . 

sBody = sBody + chr(13) + "<td colspan='2' height='10 ></td>, 
sBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= + 
SSiteURL + "grfx/black.gif width='l' height='l'x/td>" 
sBody = SBody + chr(13) + "</tr>" 
sBody = sBody + chr(13) + "<tr> " 

SBody = SBody + chr(13) + "<td width='l' bgcolor=' #000000 "ximg src= + 
SSiteURL + "grfx/black.gif width='l' height=' l'></td>" 

sBody = sBody + chr(13) + "<td colspan='2' align=' center 'ximg src=' + 
SSiteURL + "qrfx/mai lyardl.gif width='165' height='24'x/td>" . 

sB5dy = sBody + chr(13) + "<td width=^l' bgcolor=' #000000 'ximg src='" + 
SSiteURL + "grfx/black.gif width='l' height='l'x/td>" 
sBody = sBody + chr(13) + "</tr>;; 

^^sBody =^sBody +'^chr(13) +^"<td width='l' bgcolor=' #000000 'ximg src='" + 
SSiteURL + "grfx/black.gif width='l' height='l'x/td>". , 
sBody = sBody + chrC13) + "<td width='150' height='10 x/td> 
sBody = sBody + chr(13) + "<td width='398' hei ght= ' 10 ' ></td> 
SBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= + 
SSiteURL + "grfx/black.gif width='l' height='l'x/td>" 
sBody = sBody + chr(13) + "</tr>" 

sBody = sBody + chr(13) + "<tr> " • 
sBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src=' + 
SSiteURL + "grfx/black.gif width='l' height=' l'></td>" u * ... 

sBody = sBody + chr(13) + "<td colspan='2' al i gn=' center 'xa href =' + 
SSiteURL + "'ximg border=0 src='" + sSiteURL + "grfx/mailyardlogo.^if .x/ax/td> 

sBody = sBody + chr(13) + "<td width='l^ bgcolor=' #000000 V<img src='" + 
SSiteURL + "grfx/black.gif width='l' height='l'x/td>" 
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sBody = sBody + chr(13) + "</tr>" 
SBody = SBody + chr(13) + "<tr> " 
sBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= 
SSiteURL + "grfx/black.gif width='l' height=' l'></td>" 

sBody = sBody + chr(13) + "<td colspan='2' align= center > . , „ 
SBody = sBody + chr(13) + "<hr width='100%' noshade STze= 1 > 
sBody = sBody + chr(13) + "</td>" . . 

SBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= 
SSiteURL + "grfx/black.gif width='l' height='l'x/td>" 
sBody = SBody + chr(13) + "</tr>" 
sBody = sBody + chr(13) + "<tr> " 
sBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= 
SSiteURL + "grfx/black.gif width='l' height=' l'x/td>" 

sBody = SBody + chr(13) + "<td height='10' align='center 

valign='middle'x/td>" ^, , ^ „ 

sBody = sBody + chr(13) + "<td height='10'></td>" . 
sBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= 
SSiteURL + "grfx/black.gif width='l' height^' l'x/td>" 
sBody = sBody + chr(13) + "</tr>" 



SSiteURL 

valign='mi 



sBody = sBody + chr(13) + "<tr> " . . ,„ 

sBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= + 
+ "grfx/black.gif width='l' height='l'x/td>" 
SBody = sBody + chr(13) + "<td width='150' a1ign='center _ 
ddle'ximg src='" + ssiteURL + sLogo + "' width='50' height='40 ></td> 
sBody = sBody + chr(13) + "<td width='398' valign=' middle' align='center > 



sBody = sBody + chr(13) + "<table width='390' border='0' cellspacing='0' 

cellpadding='0'>" 

sBody = sBody + chr(13) + "<tr> " „ , 

sBody = sBody + chr(13) + "<td>" + sMessage + "</td> 
- : • - - sBody = sBody + chr(13) + "</tr>" 
— sBody = sBody + chr(13) + "</table>" 

sBody = sBody + chr(13) + "</td>" ^, . 

sBody = sBody + chrC13) + "<td width='l' bgcolor=' #000000 'ximg src=' + 
SSiteURL + "grfx/black.gif width='l' height=' l'x/td>" 
SBody = sBody + chr(13) + "</tr>" 

SBody = sBody + chr(13) + "<tr> " . 

sBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= + 
SSiteURL + "grfx/black.gif width='l' height=' l'x/td>" , ^. , , 

SBody = SBody + chr(13) + "<td width='150' align=' center' valign= middle 

height='10'> </td>" , . . 

sBody = sBody + chr(13) + "<td width='398' height='10'x/td>. 
sBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= + 
SSiteURL + "grfx/black.gif width='l' height=' l'x/td>" 
sBody = sBody + chr(13) + "</tr>" 

SBody = sBody + chrC13) + "<tr>" . ... 

sBody = sBody + chr(13) + "<td width='l' bgcolor=' #000000 'ximg src= + 
SSiteURL + "grfx/black.gif width='l' height='l'x/td>" 

sBody = sBody + chr(13) + "<td colspan='2' align='center 
valign='middle'>" 
%> 
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<%if not request. formC^'namel") = then 

for i = 1 to request .form. count - 1 

sMailBody = sMailBody + request. form. key (i) + " : 
Request. FormCi) + vbcrlf 
next 

set DMail = server. createobject JMai 1 -SMTPMail") 
'This is my local SMTP server 

jMai 1 . ServerAddress = "mai 1 . wearethesol uti on . com 
'This is me 

DMail. sender = "volunteer@electionmall.com 
JMail .subject = "volunteer Request" 

jMail .AddRecipient "sachin@wearethesolution.com" 

3 Mail. Body = sMailBody 
JMail .Priority = 3 
'Send it. - . 
DMail .Execute%> 



you ! <BR><BR> 



<BR><BR><BR><BR><p> . , , , 

<font face="Arial" size="2">lnformation Transmitted. . .Thank 



<a href="default.asp">Continue. . .</a><BR> 
</font><BR><BR></p> 

<i mg^src="http : //www. el ecti onmal 1 . com/grf x/banner_smal 1 . gi f "><BR><BR> 

This is a unique link on Electionmall.com. Volunteerism is an important aspect of 

To^ ensure tha"every citizen and individual will have a venue to participate we have 

link*^to**k^ individuals who wish to participate in campaigns, in fact we 

concept^called^ "ePrecinctCaptain" allows you to recruit for the 

choice^and^Lp^^ you to help get that individual elected via the world wide web. 
To become an ePrecinctCaptian please fill out the form given below. So join today! 

To find out more ^ ^ . ^ ^ - i ^ 

contact us today on how you can help in your local community and get involved at a 

click of a button. 

<form name="forml" action-" volunteering. asp" method="post"> 

<tabl e> . M ^ II / J 

<tr><Td class="normal">Name</td><td><input name= namel ></td></tr> 

<tr><Td class="normal">Email</td><td><input name="email ></td></tr> 

<tr><Td class="normal">Age</td><td><input name="age"></td></tr> 

<tr><Td class="normal">State</td><td><input name- state ></td></tr> ^ 

<tr><Td colspan="2" class="normal "xinput name="submit type- submit 

value=="Submit"></td></tr> 

</tabl e> 

</form> 

<p> 

Start today by asking others to visit this page and get involved. Together we can 
make elections free, democratic, and free!.<BR> 

For More information: <a ^ „ . « -i ■ tt / 

h ref ="mai 1 to : vol unteer@El ecti onMal 1 . com >vol unteer@El ecti onMal 1 . com</a></ p> 
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SBody = SBody + chr(13) 
SBody = SBody + chr(13) 
SSiteURL + "grfx/black.gif 
sBody = sBody + chr(13) + 
. sBody^= SBody + chrC13) + 
SBody = SBody + chrC13) 
SSiteURL-^ "grfx/black.gif 
SBody = sBody + chrC13) 
SBody = SBody + chrC13) 
sBody = SBody + chrC13) 
sBody = SBody + chr(13) 
SSiteURL + "grfx/black.gif 
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SBody = SBody + chrC13) + 
SBody = SBody + 
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teURL + 
SBody + 
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sBody + 
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sBody + 
_ teURL + 
SBody = SBody + 
SBody = sBody + 
SBody = sBody 
SBody = sBody 
SBody = sBody 
sBody = SBody , , 
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cellpadding='0'>" 

SBody = sBody + chr(13) + <tr> 

sBody = SBody + chr(13) + "<td width=' 50%'ximg src=' + sSiteURL + 
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sBody = sBody + chr(13) 
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SBody = SBody + 
SBody = SBody 
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yards. inc 

"<table width='420' border='0' censpacing='0' 
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src="' + sSiteURL + 
sBody = sBody + 
src='" + SSiteURL + 
SBody = sBody + 
src='" + SSiteURL + 
sBody = sBody + 
src="' + SSiteURL + 
SBody = SBody + 
src='" + SSiteURL + 
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th='10' height='2' bgcolor=' #000000 'ximg 

idth='l' height='l'></td>" 



+ SSiteURL 
SBody = SBody 
src-'" + SSiteURL 
SBody - sBody + 
sBody = sBody + 
sBody = SBody 
src='" + SSiteURL 
sBody = sBody 
SBody = sBody 
SBody = SBody 
SBody = SBody 
SBody = SBody 
SBody = SBody 
src='" + SSiteURL 
SBody = sBody + 
^sBody.= SBody + 
sBodv = SBody 
src='" + SSiteURL 
sBody = SBody 
sBody = SBody 



"<tr> " , . 

chr(i3) + "<td width='3' height='2' bgcolor=' #000000 'ximg 
"grfx/black.gif width='l' hei9ht=' l'></td>" 
chr(13) + "<td width= ' ' ' 

"grfx/black.gif* wiu. - . , ^ 

chr(13) + "<td width='3' height='2' bgcolor=' #000000 'ximg 
"grfx/black.gif^ width='l' height^' l'x/td>" . 
cfir(13) + "<td width='388' height='2' bgcolor=' #000000 'ximg 
"grfx/black.gif width='l' height^' l'x/td>" 
cRr(13) + "<td width='3' height='2' bgcolor^' #000000 'ximg 
"grfx/black.gif width=*l' height='l'x/td>" . 
chr(13) + "<td width='10' height='2' bgcolor^' #000000 'ximg 
"grfx/black.gif width='l' height=' l'x/td>" ^ . 

chr(13) + "<td width='3' height='2' bgcolor=' #000000 'ximg 
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chr(i3) + "<td width=*3' height='6' bgcolor^' #000000 'ximg 
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chrC13) 
chr(13) 
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chr(13) 



"<td width='10' height='6'x/td>" 
"<td width='3' height='6'x/td>" 
"<td width='388' height='6'x/td>" 
"<td width-' 3' height='6'x/td>" 
"<td width='10' height='6'x/td>" 
.... . "<td width='3' height='6' bgcolor=' #000000 'ximg 

"grfx/black.gif width='l' height^' l'x/td>" 
chr(13) + "</tr>" 

chr(13) + "<tr> " , . 

+ chr(13) + "<td width='3' bgco1or=' #000000' rowspan-' 2 'ximg 
+ "grfx/black.gif width='l' height='l'x/td>" 
+ chr(13) + "<td width='10' rowspan='2'x/td>" 
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+ chr(13) + "<td width='3' bgcolor= '#000000" rowspan='2'ximg 
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4- "</bx/fontx/td>" 
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SBody = SBody + 
sBody = SBody + 
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"<td width='388' height='3'></td>" 
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"<td width='10'></td>" 
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+ "<td width=^10'></td>" 

+ "<td colspan='3'> </td>" 

+ "<td width='10'></td>" 
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width='l' height='l'x/td>" 
"</tr>" 
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SBody = SBody 
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SBody = SBody + chr(13) 
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"grfx/1 eg. gif width='64' height='156'x/td>" 
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<% 

sBody = sBody + chrClS) + "<table width='420' border='0' censpacing='0' 
cenpadding='0'>" 

sBody = SBody + chr(13) + "<tr> " 

SBody = SBody + chr(13) + "<td width='3' height='2' bgcolor=' #000000 'ximg 
src='" + sSiteURL + "3rfx/black.gif' width='l' heipht=^r></td>" 
SBody 
teURL 
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SBody = SBody + chrC13) + "<tr> " 

SBody = SBody + chr(13) + "<td width='3' height='6' bgcolor=' #000000 'ximg 
src='" + SSiteURL + "grfx/black.gif width="l' height='l'x/td>" 
sBody - sBody + chr(13) + "<td width='10' height='6'x/td>" 
sBody = sBody + chr(13) + "<td width='3' height='6'x/td>" 
sBody = sBody + chrC13) + "<td width='388' height='6'x/td>" 
SBody - SBody + chr(13) + "<td width=*3' height='6'x/td>" 
sBody = SBody + chrC13) + "<td width='10' height='6'x/td>" 
SBody - SBody + chr(13) + "<td width-'3' height="6' bgcolor=' #000000 'ximg 
src='" + SSiteURL + "grfx/black.gif width='l' height='l'x/td>" 
sBody = sBody + chr(13) + "</tr>" 

SBody ^= sBody + chrC13) + "<tr> " ... 
'* 3'Bddy ^ sBody + chr(13) + "<td width='3' bgcolor=' #000000' rowspan=' 2 'ximg 
src='" +'-3SiteURL + "grfx/black.gif width='l' height=' l'x/td>" 
sBody = SBody + chr(13) + "<td width='10' rowspan=' 2 'x/td>" 
SBody = sBody + chr(13) + "<td colspan='2' valign=' bottom' height=:'60' 
align='center'>" 

sBody = SBody + chr(13) + "<table width='100%' border='0' cellspacing-'O' 
cenpadding='0'>" 

sBody = sBody + chr(13) + "<tr>" 

SBody = SBody + chrC13) + "<td width='20%'ximg src='" + sSiteURL + 
"grfx/flag.gif width='122' height-' 58'x/td>" 

SBody = SBody + chrC13) + "<td width='80%' aliqn=' right 'xfont 
face=' Verdana, Arial, Helvetica, sans-serif size='7' color='#0B3295'xbxfont 
size-'6'>V0TE " . , . „ 

SBody = sBody + chr(13) + "FOR</fontx/b></font></td> 
SBody = SBody + chr(13) + "</tr>" 
SBody = SBody + chr(13) + "</table>" 

SBody = sBody + chr(13) + "<font face='Arial, Helvetica, sans-serif size= 
col or= ' #FFFFFF ' x/f ont></td>" 

SBody = SBody + chr(13) + "<td val i gn= ' bottom ' height- '60' 
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sBody = sBody + chr(13) + "<td width='10' rowspan='2'></td> 
SBody - sBody + chr(13) + "<td width-'3' bgcolor- '#000000' rowspan='2'ximg 
src-'" + SSiteURL + "grfx/black.gif width-'l' height='l'></td>" 
SBody = SBody + chrC13) + "</tr>" 

SBody = SBody + chr(13) + "<tr> " ... 
sBody - SBody + chr(13) + "<td colspan='3' valign-' middle' height='130 
align-'center'xfont face='Arial , Helvetica, sans-serif size-'?' 
color-' 0B3295'xb>" + sLast_Name + "</bx/fontx/td>" 
sBody - SBody + chrC13) + "</tr>" 
sBody = sBody + chr(13) + "<tr> " 
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"<td width='10S</td>" 
"<td width='3'></td>" 

"<td width='388' align=' center' valign^* bottom '> 
+ "<table widths '100%' border='0' cellspacing='0' 



sBody = sBody + chrC13) + 
sBody = SBody + chr(13) + 
sBody = SBody + chr(13) + 
SBody = SBody + chr(13) 
cenpadding='0'>" 

SBody = SBody + chr(13) + "<tr> " 

sBody = sBody + chrC13) + "<td width='80%* align- 
face=' Verdana, Arial, Helvetica, sans-serif size='6' color 
sPosition + "</b></font></td>" ^ .... ^ ,noo/. • 
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sBody = SBody + chr(13) 
sBody = sBody + chr(13) 
SBody = SBody + chr(13) 
SSiteURL + "grfx/black.gif ' 
SBody = SBody + chr(13) + 
SBody = sBody + chr(13) + 
SBody = SBody + chr(13) 
SSiteURL + "grfx/black.gif 
sBody = SBody + chrC13) 
SBody = SBody 
sBody = SBody 
SBody = sBody 
SBody = SBody 
SBody = sBody 
SSiteURL + "grfx/black.gif 
SBody = sBody + chr(13) + 
^sBDdy,^= SBody + chr(13) + 
sBody = SBody + chrC13) 
sSiteURL'*+ "grfx/black.gif 
SBody = sBody + chr(13) 
SBody = sBody + chr(13) 
SBody = SBody + chrC13) 
sBody = SBody + chr(13) 
SSiteURL + "grfx/black.gif 
sBody == SBody + chrC13) + 
sBody = SBody + chrC13) + 
SBody = sBody + chrC13) 
SSiteURL + "grfx/black.gif 
sBody = SBody + chrC13) 
sBody = sBody -f chrC13) 
sBody = SBody + chr(13) 
sBody = SBody + chr(13) 
SSiteURL + "grfx/black.gif 
SBody = sBody + chrC13) + 
SBody = SBody + 
SBody = SBody 
src='" + SSiteURL 
SBody = sBody 
src='" + SSiteURL 
sBody = SBody 
src='" + SSiteURL 
sBody = SBody 
src='" + SSiteURL 
sBody = SBody 
src='" + SSiteURL 
SBody = SBody + 
SBody = SBody + 
SBody = SBody 
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+ "<td width='3'></td>" . 
+ "<td width-' 10 '></td>" 
+ "<td width-'3' bgcolor-' #000000 'ximg 
width-' 1' height-' l'></td>" 
"</tr>" 
"<tr> " 

+ "<td width-' 3' bgcolor-' #000000 "ximg 
width-' 1' height-' l'x/td>" 
"<td width=^10'x/td>" 
width='3'x/td>" 
width- '388' height-' 3 'x/td>" 
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src= 
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"<td 
"<td 
"<td 
"<td 
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"</tr>" 
"<tr>" 

+ "<td width-' 3' bgcol or- '#000000' XI mg 
width='l' height-' l'x/td>" 
+ "<td width-'^10'x/td>" 
+ "<td colspan='3'> </td>" 
+ "<td width-'10'x/td>" 
+ "<td width-' 3' bgcol or- '#000000 'ximg 
width-' 1' height- 'l'x/td>" 
"</tr>" 
"<tr> " 

+ "<td width='3' bgcol or- '#000000 'ximg src-' + 
width='l' height-' l'x/td>" 
+ "<td width='^10'x/td>" 
+ "<td col span-' 3' height-' 6 'x/td>" 
+ "<td width='10'x/td>" 

+ "<td width-' 3' bgcol or- '#000000 'ximg src-' + 
width-' 1' height- 'l'x/td>" 
"</tr>'^ 
"<tr> " 

+ "<td width-' 3' bgcol or- '#000000' height-' 2 'ximg 
rfx/black.gif width-'l' height-' l'x/td>" . 
chrC13) + "<td width-'lO' heiqht='2' bgcol or- '#000000 'ximg 
"grfx/black.gif width-'l' height-' l'x/td>" . 
chr(13) + "<td colspan-'3' height-'2' bgcol or- '#000000 'ximg 
"grfx/black.gif width-'l' height-' l'x/td>" 
chr(13) + "<td width-'lO' 

"grfx/black.gif wiL_,. _ _^ 

chr(13) + "<td width='3' bgcol or- '#000000' height-' 2 *ximg 
"grfx/black.gif width-'l' height- •l'x/td>" 
chr(13) + "</tr>" 
chr(13) + "<tr> " 

+ chr(13) + "<td width='3'> </td>" 
+ chr(13) + "<td width-' 10 '> </td>" 

Page 2 



chr(13) + 
+ chrClS) 
+ 
+ 
+ 
+ 
+ 
+ 

+ 
+ 



idtn- 1 neignt- X x/T:a> 

th-'lO' height-' 2' bgcol or- '#000000 'ximg 

idth-'l' height-' l'x/td>" 

i-u_<^» Ur^r-r^i r^^-^ -H^nnnnnn^ hc^inhr—* 7^>.^imn 



yard4.inc 

sBody = sBody + chrClS) + "<td width='3'> </td>" 

sBody = sBody + chr(13) + "<td width='388'> " . . . 

sBody = SBody + chr(13) + "<table width='100%' border='0' censpacing='0' 
cellpaddi ng='0'>" 

sBody = sBody + chr(13) + "<tr> " 
sBody = SBody + chr(13) + "<td width='50%'><img src="' + sSiteURL + 

"grfx/leg.gif width='64' height='156'></td>" ■;, 

SBody = SBody + chrC13) + "<td width='50%' alian=' nght'ximg src="' + 
SSiteURL + "grfx/1 eg2.gif' width='64' height^' 156'></td>" 
sBody = SBody + chr(13) + "</tr>" 
sBody = SBody + chr(13) + "</table>" 
sBody = SBody + chr(13) + "</td>" , _ „ 

SBody = sBody + chr(13) + "<td width='3'> </td>" 
sBody = SBody + chr(13) + "<td width=' 10'> </td>" 
sBody = sBody + chr(13) + "<td width='3'> </td>" 
sBody = sBody + chr(13) + "</tr>" 

%> 
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<% 

sBody = sBody + chrClS) + "<table width='420' border='0' cell spacing='0' 
cenpadding='0'>" 
sBody = sBody + chr(13) + "<tr> " 

SBody = sBody + chrC13) + "<td width='3' height='2' bgco1or=' #000000 'xlMG 
heiqht=l src="' + sSiteURL + "grfx/black.gif width=l></td>" 

sBody = sBody + chr(13) + ^<td width=^10' height='2' bgcolor=' #000000 'ximg 
height=l src="' + sSiteURL + "grfx/black.gif width=l></td>" 

sBody = sBody + chr(13) + ^<td width=^3' height='2' bgcolor=' #000000 'xlMG 
heiqht=l src="' + sSiteURL + "grfx/black.gif width=l></td>" 

sBody = SBody + chr(13) + *'<td width='^3S8' height='2' bgco1or=' #000000 'xIMG 
height=l src='" + sSiteURL + "grfx/bTack.gif width=l></td>" 

SBody = sBody + chr(13) + ^<td width=^3' height='2' bgcolor=' #000000 'xIMG 
height=l src='" + sSiteURL + "grfx/black.gif width=lx/td>" 

SBody = sBody + chrC13) + ^<td width='^10' height='2' bgcolor=' #000000 'xiMG 
heiqht=l src='" + sSiteURL + "grfx/black.gif width=l></td>" 

sBody = sBody + chr(13) + ^<td width=^3' height='2' bgcolor=' #000000 'xiMG 
height=l src='" + sSiteURL + "grfx/black.gif width=lx/td>" 
SBody = SBody + chr(13) + "</tr>" 
SBody = sBody + chr(13) + "<tr> " 

sBody = sBody + chrC13) + "<td width='3' height='6' bgcolor=' #000000 'xIMG 
height=l src='" + sSiteURL + "grfx/black.gif width=lx/td>" 

sBody = sBody + chr(13) + '*<td width=^10' height='6'x/td> 

sBody = sBody + chr(13) + "<td width='3' height='6'></td>' 

sBody = SBody + chr(13) + "<td width='388' height='6'x/td>' 

sBody = sBody + chr(13) + "<td width='3' heiqht=' 6'x/td>" 

sBody = SBody + chr(13) + "<td width='10' height='6'x/td>" 

sBody = sBody + chr(13) + "<td width='3' height='6' bgcolor=' #000000 'xlMG 
height=l src='" + sSiteURL + "grfx/black.gif width=l></td>" 
sBody = SBody + chrC13) + "</tr>" 
.sBody-= §Body + chr(13) + "<tr> " 

sBodjL= sBody + chrC13) + "<td width='3' bgcolor=' #000000' rowspan='2 xlMG 
height=l src='" + sSiteURL + "grfx/black.gif width=lx/td>" 

SBody = sBody + chrC13) + "<td width=^10' rowspan='2'x/td> 

sBody = SBody + chrC13) + "<td colspan='2' valign=' bottom' height= 60 
align='middle'>" , ., , . 

sBody = SBody + chrC13) + "<table width=' 100%' border='0' cellspacing= 0 

cellpadding='0'>" 

SBody = sBody + chr(13) + "<tr> 

sBody = sBody + chrCO) + "<td width='20%' bgcolor='#cc3366'xiMG 
height=58 src='" + sSiteURL + "grfx/flag.gif width=122x/td>" 

SBody = sBody + chr(13) + "<td width='80%' align=' right 'xfont 
face=' Verdana, Arial, Helvetica, sans-serif size='7' color='#0b3295 xbxtont 

size- 6 > ^gjjjy ^ sBody + chrC13) + "vote FOR</fontx/bx/fontx/td>" 
sBody = sBody + chr(13) + "</tr>" 
sBody = sBody + chrC13) + "</table>" . . 

sBody = SBody + chr(13) + "<font face='Arial, Helvetica, sans-serif size= 7 
color='#ffffff x/font></td>" .... 

sBody = sBody + chr(13) + "<td valign=' bottom' height='60 
align='middle'> </td>" . , ^ „ 

sBody = SBody + chrC13) + "<td width='10' rowspan='2'x/td> 
SBody = sBody + chr(13) + "<td width='3' bgcolor=' #000000' rowspan= 2 xiMG 
height=l src='" + sSiteURL + "grfx/black.gif width=lx/td>" 
sBody = SBody + chrC13) + "</tr>" 

SBody = SBody + chr(13) + "<tr> " . . , u ■ u 

SBody = sBody + chra3) + "<td colspan='3' valign=' center' height= 130 
align='middle' bgcolor='#0b3295 'xfont face='Aria1 , Helvetica, sans-serif size= 7 
color='#0b3295' ^ „ 

SBody = SBody + chr(13) + " xbxfont color='#ffffff' > + sLast_Name + 
"</font></b></font></td>" 

SBody = SBody + chrC13) + "</tr>" 
SBody = SBody + chr(13) + "<tr> " 
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sBody = sBody -f chr(13) + "<td width='3' bgcolor^' #000000 'xiMG height=l src='" 
+ sSiteURL + "grfx/black.gif width=l></td>" 

SBody = SBody + chr(13) + "<td width=' 10'></td>" 
SBody = sBody + chr(13) + "<td width=' 3 '></td>" 

SBody = sBody + chr(13) + "<td width='388* align='middle' valiqn=' bottom '> " 
SBody = sBody + chr(13) + "<table widths '100%' border='0' ceTlspacing='0' 
cenpadding='0'>" 

SBody = SBody + chr(13) + "<tr> " 

SBody = SBody + chr(13) + "<td width='80%' align=neft 'xfont 
face=' Verdana, Arial, Helvetica, sans-serif size='6' coTor='#0b3295 '><b>" + 
sPosition + "</b></font></td>" 

sBody = sBody -t- chr(13) + "<td align=' right ' width='20%'><IMG height=58 
src=:'" + SSiteURL + "grfx/f "I ag2.gif' width=122></td>" 
sBody = SBody + chrC13) + "</tr>" 
SBody = SBody + chr(13) + "</table>" 
SBody = SBody + chr(13) + "</td>" 
SBody = SBody + chr(13) + "<td width=' 3 '></td>" 
sBody = sBody + chr(13) + "<td width='10'></td>" 

SBody SBody + chr(13) + "<td width='3' bgcolor=' #000000 'xlMG height=L src=' " 
+ SSiteURL + "grfx/black.gif width=l></td>" 
sBody = SBody + chr(13) + "</tr>" 
sBody = sBody + chr(13) + "<tr> " 

sBody = SBody + chr(13) + "<td width='3' bgcolor=' #000000 'xlMG height=l src='" 
+ SSiteURL + "grfx/black.gif width=lx/td>" 
--^ sBody = sBody + chr(13) + "<td width=' 10'x/td>" 

C sBody = sBody + chrC13) + "<td width=' 3 'x/td>" 
m SBody = SBody + chr(13) + "<td width='388' heiQht=' 3*x/td>" 

S sBody = SBody + chr(13) + "<td widths' 3 '></td>'^ 

2 sBody = sBody + chr(13) + "<td width-'10'x/td>" 

t^f sBody = sBody + chr(13) + "<td width-'3' bgcolor=' #000000 'xiMG height=l src='" 

III + -sSit>eURL^+ "grfx/black.gif width=lx/td>" 
O sBody ^ sBody + chrC13) + "</tr>" 
.fi sBody = sBody + chrC13) + "<tr> " 

sBody = SBody + chrC13) + "<td width='3' bgcolor=' #000000 'xiMG height=l src='" 
^ + SSiteURL + "grfx/black.gif width=lx/td>" 
Q sBody = SBody + chr(13) + "<td width=' 10'x/td>" 

J SBody = SBody + chrC13) + "<td colspan='3'x/td>" 

d SBody = sBody + chrC13) + "<td width='10'x/td>" 

H sBody = sBody + chr(13) + "<td width=*3' bgcolor=' #000000 'xlMG height^l src=:'" 

m + SSiteURL + "grfx/black.gif width=:lx/td>" 
Cl sBody = sBody + chr(13) + "</tr>" 

I SBody = sBody + chrC13) + "<tr> " . 

sBody = sBody + chrC13) + "<td width='3' bgcolor=' #000000 'xiMG height=l src='" 
+ SSiteURL + "grfx/black.gif width=lx/td>" 

sBody = SBody + chr(13) + "<td widths' 10 •x/td>" 

SBody = sBody + chr(13) + "<td colspan='3' heights '6'></td>" 

SBody = SBody + chr(13) + "<td width='10'x/td>" 

SBody = sBody + chr(13) + "<td width='3' bgcolor=' #000000 'xlMG height=l src='" 
+ SSiteURL + "grfx/black.gif width=l></td>" 
SBody = sBody + chrC13) + "</tr>" 
sBody = sBody + chr(13) + "<tr> " 

SBody = sBody + chr(13) + "<td width=*3' bgcolor=' #000000' height='2'xlMG 
heigh t=l src='" + sSiteURL + "grfx/black.gif width=lx/td>" 

sBody = sBody + chr(13) + ^<td width='^10' height='2' bgcolor=' #000000 'xlMG 
height=l src='" + sSiteURL + "grfx/black.gif width=lx/td>" 

sBody = SBody + chr(13) + '^<td colspan='3* height=:'2' bqcol or-' #000000 'xlMG 
height=l src='" + sSiteURL + "grfx/black.gif width=lx/td>" 

sBody = sBody + chr(13) + '^<td width=^10' height='2' bgcolor^' #000000 'xiMG 
height=l src='" + sSiteURL + "grfx/black.gif width=lx/td>" 

sBody = sBody + chr(13) + '^<td width=^3' bgcolor=' #000000' hGight='2'xlMG 
height=l src='" + sSiteURL + "grfx/black.gif width=lx/td>" 
sBody = SBody + chr(13) + "</tr>" 
SBody = SBody + chr(13) + "<tr> " 

Page 2 



yards. inc 

sBody = sBody + chr(13) + "<td widths' 3 •> </td>" 
sBody = SBody + chr(13) + "<td width=*10'> </td>" 
sBody = SBody + chr(13) + *'<td width=' 3 '> </td>" 

sBody = SBody + chrC13) + "<td width='388'> " ... 
SBody = SBody + chr(13) + "<tab1e width='100%* border='0' cellspacing='0' 
cenpadding="0'>" 

sBody = SBody + chr(13) + "<tr> " 

sBody = sBody + chrC13) + "<td width=' 50%'xlMG height=156 src=' + 
sSiteURL + "grfx/leg.gif width=:64></td>" , . . , - ^ 

sBody = SBody + chr(13) + "<td width='50%* aligns' nght'xiMG height=156 
src='" + SSiteURL + "grfx/leg2 .gif width=64></td>" 
sBody = SBody + chr(13) + "</tr>" 
SBody = sBody + chr(13) + *'</table>" 
SBody = SBody + chr(13) + "</td>" ^ ^ 

SBody = sBody + chrC13) + "<td width=*3'> </td> 
sBody = sBody + chr(13) + "<td width='10'> </td>" 
SBody = SBody + chr(13) + "<td width='3'> </td>" 
sBody = sBody + chrC13) + "</tr>" 

%> 
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5.html 

<HTML> 
<HEAD> 

<TITLE>REPUBLIG\N NATIONAL C0MIV1ITTE</TITLE> 

<style type="text/css"> 

<! — 

.font { font-family: Helvetica, Arial, sans-serif; font-size: 15pt; font-style: 
normal; font-weight: bold; color: #660000} 
— > 
<i -- 

.fontl { font-family: Helvetica, Arial, sans-serif; font-size: 12pt; font-style: 

normal; font-weight: normal; color: #660000} 

--> 

</style> 

</HEAD> 

<BOBY BGCOLOR=#FFFFFF TEXT=#0OO00O LEFTMARGIN=0 TOPMARGIN=0 MARGINWIDTH=0 
MARGINHEIGHT=0> 

<TABLE WIDTH=485 CELLPADDING=0 CELLSPACING=0 BORDER=0> 

<TR> 

<TD> 

<TABLE WIDTH=485 CELLPADDING=0 CELLSPACING=0 BORDER=0> 
<TR> ^ . , 

<TD><IMG SRC=images/topleft.jpg width=368 height=64></td> 
<TD><IMG SRC=images/topright.jpg WIDTH=117 HEIGHT=54></TD> 

</TR> 
<TR> 

<TD><IMG SRC=images/topleftl. jpg WIDTH=368 height=30></td> 
<TD><IMG SRC=i mages/ rightl_l.jpg WlDTH-117 HEIGHT=30></TD> 

</TR> 
<TR> 

<TD VALIGN=T0P> 
<TAaLt>-" ^ 
<TR> ^ 

<TD><IMG SRC=images/r nclogo.gif WIDTH=61 HEIGHT=48></TD> 

</TR> 

<TD><BR><F0NT FACE= Arial Black, Helvetica, sans-senf SIZE=4 

COLOR=#990000><B>Hello, MR RAVI SINGH</B></F0NT></TD> 

</TR> 

<TR> , 
<TD><F0NT FACE=Arial, Helvetica, sans-serif SIZE=:2><B><BR>RNC needs your 
support<BR>vote Republican Party<BR>George w. Bush for President<BR>Republican Party 
is the right choi ce</B></F0NT> 

</TD> 
</TR> 
</TABLE> 
</TD> 

<TD><IMG SRC=images/rightl_2oPg WIDTH=117 HEIGHT=210></TD> 

</TR> 
<TR> 

<TD><IMG SRC=images/bl uedot.gif WIDTH=368 HEIGHT=2></TD> 

<TD><IMG SRC=images/bl uedot.gif width=117 height=2></TD> 
</TR> 
</TABLE> 

<center> 
<table> 

<TD><font FACE=verdana,arial , Helvetica, sans-serif siZE=l><B>This evardsign is 
brought to you by</B></FONT> <IMG SRC=images/eyard.gif WIDTH=175 HEIGHT=34 
align=middle></td> 

</TR> 

<table> 
</center> 

</TD> 
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</TR> 
<TABLE> 
</BODY> 
</HTML> 
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insertbuttons.inc 

<% 

function insertButtonsO 

sTrack_id = cstr(cdbl (sTrack_id)*2137) 
suser = "78336" 

sBody = SBody + "<TABLE borer='0' censpacing='0' cellpadding='0' 
widths' 100% '><TR>" _ , . ^ ^ . ^ " . 

SBody = sBody + "<TD colspan='5' al ign=' center 'xfont face=' Verdana, Anal 

size='2'><B>^' ^ ^ . , . ^ • 

SBody = sBody + "Please show your support by clicking on fol lowing 

1COnS<BR><BR></B></font></TD></TR><TR>" 

'Headquarters , „ 

SBody = sBody + "<TD width='20%' al ign=' center '> 
SBody = sBody + "<A target="31ank' href-'http://www- rnc,org'>" 
sBody = sBody + "<img src=*" + sSiteURL + "grfx/hdq.gif border^ 0 
al t= ' Headquarters ' ></A><BR>" 

SBody = SBody + "<font face=' Verdana, Arial 
si ze= ' 1 ' >Headquarters</f ont></TD>" 

'Donate , „ 

sBody = sBody + "<TD width='20%' al ign=' center '> 
SBody = SBody + <A target='_blank' ^^o^o 
href= * https : //www. econtri butor . net/Contri buti on/Contri bution . cfm?CFID^3628b&CFT0KEN 

76150501'>" . „ ^ u A 

sBody = sBody + "<img src='" + sSiteURL + "grfx/donate.gif border= 0 
alt=' Donate '></A><BR>" .... /x ^ /-^r. " 

SBody = sBody + "<font face=' Verdana, Anal' size='l'>Donate</font></TD> 

'volunteer , „ 

sBody = sBody + "<TD width='20%' align=' center '> 
sBody = SBody + "<A target='_blank' 
href='http://www. rnc.org/RNCWeb/action. asp'>" ^, ^ , ^ -r. u ^ 

; v sBody ^ sBody + "<img src='" + sSiteURL + "grfx/vol unteer.gif border= 0 
alt=' voliunteer '></A><BR> ' , ^ /r- / 

SBody = sBody + "<font face=' Verdana, AriaT size='l'>volunteer</font></TD> 

'Send to Freind , 
sBody = sBody + "<TD width='20%' align='center'> 
SBody = sBody + "<A target='_blank' href='" + sSiteURL + 
"sendtofriend_form.asp?id=" + sTrack_id + "&user='; + sUser + . >^ . . 

SBody = sBody + "<img src='" + sSiteURL + "grfx/sendtoaf nend.gif border= 0 
al t=:' send to a Friend '></A><BR>" ... 

sBody = sBody + "<font face=' Verdana, Anal' size='l >Send to 
Fri end</f ont></TD>" 
'Vote 

sBody = SBody + "<TD width='20%' al ign-' center '>" 
sBody = sBody + "<A targets '_blank' href='" + sSiteURL + "vote„form.asp?id= + 
sTrack_id + "&user=" + sUser + "'>" „ ^ , u ^ 

sBody = sBody + "<img src='" + sSiteURL + "grfx/vote.gif border= 0 
alt='vote'></A><BR>" . . . ^ /™ M 

sBody = sBody + "<font face=' Verdana, Anal' size='l'>Vote</font></TD> 
sBody = sBody + "</tr></table></td></tr></table>" 
end function%> 
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yard_rncl.inc 

<% 

sSiteURL = "http://www.eyardsigns.com/" 
sBody = sBody + "<html><body>" 

if not bweb then 

sBody = SBody + "if the eYardSign below does not show up correctly, 
<BR>click here: <a „ 
href=http: //www. eyardsigns . com/previ ew_yardsi gn . asp?id=534250&user=78336> + chrClBj 

SBody = SBody + ^^^^ , 

"http: //www. eyardsigns. com/previ ew_yardsign.asp?id=534250&user:=78336</a><BR><BR> 

end if 

SBody = SBody + "<TABLE WIDTH=485 CELLPADDING=0 CELLSPACING=0 BORDER=0> " + chrCl3) 

sBody - sBody + "<tr><td>" + chr(13) „ . 

SBody = SBody + "<TABLE WIDTH=485 CELLPADDING-0 CELLSPACING=0 BORDER=0> + chr(13) 
SBody = SBody + "<TR><TD WIDTH=2><IMG 

src=http://www. eyardsigns.com/grfx/rnc/bluedot.gif WIDTH='2' HEIGHT= 305 > 

</TD><TD>" + Chr(13) ^ ^ „ L. 

SBody = SBody + "<TABLE WIDTH=485 CELLPADDING=0 CELLSPACING=0 BORDER=0> + chr(13) 
SBody = sBody + "<TR>" + chrC13) , . ^ , „ n ^ .c 

sBody = SBody + "<TD><IMG src=http://www. eyardsigns.com/grfx/rnc/bluedot. git 
WIDTH=350 HEIGHT-2></TD> " + chr(13) . . , /. ^ 

sBody = sBody + "<TD><IMG src=http://www. eyardsigns.com/grfx/rnc/bluedot .git 
WIDTH-135 HEIGHT=2></TD></TR>" + chr(13) 

sBody - sBody + "<TR>" + chr(13) , ^ , 

SBody = SBody + "<TD><a href =http: //www. rnc.org target=_blank><lMG 
src=:http: //www. eyardsi gns . com/grf x/rnc/topl 2 . gi f WIDTH=350 HEIGHT=64 
border=0></a></TD> " + chr(13) , 
SBody = sBody + "<TD><a href=http: //www. rnc.org target=_b1ank><lMG 
s rc=:http : //www . eyardsi gns . com/grf x/rnc/topr2 . gi f WIDTH=13 5 height=64 
border^O></a></TD> " + chr(13) 
"sBody = ^Body + "</TR><TR> " + chrC13) 

sBody = SBody + "<TD><a href =http: //www. rnc.org target=_blank><lMG 
src=http : //www. eyardsi gns . com/grf x/rnc/topl 2Jl . gi f WIDTH=3 50 HEIGHT=30 
border=0></a></TD> " + chr(13) ,^ , 

SBody = SBody + "<TD><a href=http: //www. rnc.org target=_blank><lMG 
src=http : //www . eyardsi gns . com/g rf x/rnc/ri ght2_l . gi f WIDTH=135 HEIGHT=30 
border=0></a></TD> " + chrC13) .... 
SBody = SBody + "</TR><TR><TD VALIGN=TOP> + chr(13) 
SBody = sBody + "<TABLE><TR> " + chr(13) 

sBody = sBody + "<td><font face= "Arial Black, Helvetica, sans-serif SIZE=4 
COLOR=#990000><B>Dear Republican Friend, " + sName + "</b></font></td> + chrC13) 
SBody = sBody + "</TR><TR> " + chr(13) 

sBody = sBody + "<TD><FONT FACE='Arial, Helvetica, sans-serif siZE=2><B>0ur success 
in the elections depends on you. Lend a hand and send this eyardsi gn to everybody 
on your email list. " + chrC13) , ^ 

SBody = sBody + "<BR><BR>Your financial donation will help the GOP get our message 

of compassionate conservatism directly to the American people. </B></FONT> 

</TD></TR>" + chr(13) , ^ , 

sBody = SBody + "<TR><TD><a href=http: //www. rnc.org target=„blank><lMG 

s rc=http : //www . eyardsi gns . com/g rf x/rnc/ rncl ogo . gi f WIDTH=61 HEIGHT=48 

border=0></a></TD> " + chr(13) 

sBody = sBody + "</tr></table> " + chr(13) 

sBody = sBody + "</TD> " + chrC13) 

sBody = sBody + "<TD valign='top'><iMG . 

s r c=http : //www . eyardsi gns . com/g rf x/rnc/ri ght 2„2 . gi f WIDTH=13 5 HEIGHT=210></TD> + 

chra3) 

SBody = sBody + "</TR><TR> " + chr(13) , . , „ ^ 

sBody = sBody + "<TD><IMG src^http: //www. eyardsi gns -com/grfx/rnc/bl uedot.gif 
WIDTH=350 HEIGHT=2></td> " + chr(13) „t . 

SBody = SBody + "<td><IMG src^http://www.eyardsigns. com/grf x/rnc/bluedot .git 
WIDTH=135 HEIGHT=2></TD> " + chrC13) 
SBody = SBody + "</TR></TABLE>" + chr(13) 
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SBody = SBody + "</TD><TD WIDTH=2><IMG 

src=http: //www. eyardsigns.com/grfx/rnc/b1 uedot.gif WIDTH= 2 HEIGHT= 305 > 
</TD></TR></TABLE>" + chrClS) 

sBo^y = sBody + " <CENTER><tab1 e width='485' border='0' cellspacing='0' 

cenpadding='0'>" + chr(13) 

sBody = sBody + " <tr> " + chr(13) 

sBody = SBody + " <td width='20%' alic|n=' nght'ximg 

src='http://www. eyardsigns.com/grfx/rnc/leg. git' width='64 height= 156 ></td> + 
ch r 

sBody = sBody + " <td width='40%'> </td>" + chr(13) 

sBody = SBody + " <td width='20%'><imq , 

src='http://www.eyardsigns,com/grfx/rnc/leg.gif ' width='64 height= 156 ></td> + 

ch r (X3) 

SBody = sBody + " </tr>" + chr(13) 

SBody = SBody + " </table>" + chrC13) 

Buttons^^^^^ = sBody + "<TABLE borer='0' censpacing='0' cellpadding='0' 
width- ■'■^^jJ^^'^ggQjjy ^ ..^jo co1span='2' al ign=' center 'xfont face=' Verdana, AriaT 
size- 2 ><B>^ ^ sBody + "Please show your support by clicking on following 

i con S<BR></f on t></ B></TD></TR><TR> " 

' Donate . , . 

sBody = SBody + "<TD width='20%' align=' center > 
sBody = sBody + "<A target='_blank' , „ 

h ref=' https : //www. econtri butor . net/Cont ri buti on/Logi n . cfm?AlD=QTPlGOLVZEBF > 
. . sBody .5= SBody + "<img src="' + sSiteURL + "grfx/donate.gTf border= 0 
al t=' Donate '></A><BR>" . . ^ /-^^ n 

sBody = sBody + "<font face=' Verdana, AnaT size='l'>Donate</font></TD> 

'Send to Friend . , . 

sBody = sBody + "<TD width='20%' al ign=' center '> 
sBody = sBody + "<A target='_blank' href="' + sSiteURL + 

"sendtofriend_RNC.asp'>" . „ , £ • ^ k^K-ri^r. 'n' 

sBody = sBody + "<img src="' + sSiteURL + "grfx/sendtoafnend.gif border= 0 

alt='send to a Friend'></A><BR>'' . -, , • .-.i c- ^ 

SBody = sBody + "<font face=' Verdana, Anal' size= 1 >Send to 

Friend</font></TD>" , . , „ .. 

SBody = sBody + "</tr></table></td></tr></table><br> 

sBody = sBody + "<table border=0 cellpadding=0 cellspacing=0 width=485><TR>" + 
chrC13) 

sBodv = SBody + "<TD col span=2><iMG ^ , . „ ^„ 

src=http : //www.eyardsi gns . com/grf x/rnc/bl uedot . gi f WIDTH=485 height=2></td></tr><tr> 

sBody = sBody + "<TD align=left><a href='http://www.electionmall .com' 

target='_blank'><iMG border=0 , , . ,. u 

src=http: //www.eyardsi gns. com/grf x/rnc/electionmall 02. gif></a></td> + chrQli; 

sBody = sBody + "<TD align=right><FONT FACE='Arial, verdana, Helvetica, sans-sent 

SiZE=l>This evardsign is brought to you by</FONT><BR>" + chr(13) ^ 

sBody = sBody + "<a href='http://www. eyardsigns.com' target= _blank xIMG 

src=http : //www. eyardsi gns . com/grf x/rnc/eyard . gi f border=0 

></a>   </TD>" + chr(13) .» • i u^n,,^*.,-^, 

sBody = sBody + ••</TR><TR><td colspan=2 align=center><FONT FACE='Arial, Helvetica, 
sans-serif siZE=l>Paid for by the Republican National Committee | © 2000 Republican 
National Committee. <BR>All rights reserved. </font></td>"+ chrC13) 
SBody = SBody + "</tr></table></center></td></tr></table> + chr(13) 
sBody = sBody + "</body></html>" 
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adredi r.asp 

<% Response. Redirect (Request. QueryStringC'url")) %> 
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repl ace_apost . code 

<% 

function replace^apostCctrl) 

Ctrl = replace(ctrl,chrC34),chr(147)) 
repl ace_apost =replaceCctrl , " , chr(146)) 

end function 

function Wrap_Text(sStr,iLen) 

iinc = lnt(len(sStr)/iLen) 

i start = 1 

for i = 1 to iinc 

sstrl = sstrl + Mi d(sstr,i Start, iLen) + <BR> 

i Start = i start + iLen 

next 

sstrl = sstrl + right(sstr,len(sstr)-istart+l) 
Wrap_Text = sstrl 
end function 

%> 
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AddRemove. js 

function AddRemove (i) { 
if(i==0) { 

X = 0; 

y = 1; 

} 

else { 

X = 1; 
y = 0; 

} 

with (document . frrruAddtol i St) { 

ilndex = selectlCx] .selectedlndex; 

//Check if any list name is selected or not 

if(ilndex=— 1) { 

alertC'No list selected"); 

return false; 

} 

iOptionNum = selectlEy] .options. length; 
sText = selectl[x] .options [ilndex] .text; 
svalue = selectl[x] .optionsCilndex] .value; 

selectl[y] .options [iOptionNum] = new option(sText, svalue) ; //add 

Item to list seiectl[x] .options[iindex3 = null; //remove item from other list 
//select the topmost item in current list 
i f (sel ectl [x] . opti ons . 1 ength ! =0) 

selectl[x] .options [0] .selected = true; 

} 

} 

function^heckForm^ddtolistO { ^ 

if (document. frm^ddtoli St. stype. value == 0 ) { 
with (document. frm^ddtoli St) { 

i f (sel ectl[l] .options. length==0) { . 

alert("Please add atleast ONE Email List ); 
selectl[0] . opti ons [0] .sel ected=true; 
btn_add.focus() ; 
return false; 

} 

else { 

//select all items in list2 ^ 
for (i=0; i<sel ectl[l] . options . 1 ength ; i++) 

selectl[l].options[i]. selected = true; 

//nullify all items from listl 
i f (sel ectl[0] . opti ons . 1 ength ! =0) 

selectl[0] .options[selectl[0] .selectedlndex] .value = 
} 

} else { 

if (! isEmailVal id (document, frm^ddtoli St. one„email -value)) { 
alert ("- Enter a valid email address in the form 

XXX@XXX . XXX . ") 

document, frm^ddtoli St. one_email .focus () ; 
return false; 

} 

} 

} 
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chat.js 

function openchatO 

wi ndow . name="maste rwi ndow" ; 
chatwi n = 

wi ndow . open (" " , " chatwi ndow" , "tool bar=0 , 1 ocati on=0 , menubar=0 , wi dth=5 30 , hei ght=450 , res 
izable=0"); 

chatwi n. location, href = . -,0 

" http : //mypubl i cservant . communi ty . everyone . net/communi ty/scri pts/chat Frameset . p\ ?Nod 
elD=6294r ; 

chatwi n.focusC) ; 

} 
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spch.js 

// (c) 2000 Spell Checker. net, inc. All rights reserved. www.SpellChecker.net 
// PLEASE DO NOT EDIT THIS FILE. THE SYSTEM MIGHT FAIL TO WORK IF THE FILE WAS 
CHANGED . 

// 

//var service_host = "http://service.host.name/and_path_if_requierd"; 
// 

var service_host = "http://www.spenchecker.net/spellcheck/"; 
var customerid = "0957544497"; 
var schema = "live. demo"; 

var bnr = "1"; 
var c_lang = ""; 
var ci_lang = 

var int_lang = "en"; 

var docd>lank = "/I f /blank. html " ; 

var doc_blankform = "/I f/bl ankform.html"; 

var doc_process = "script/ssrv.cgi" ; 

function doSpell( lang, Ctrl, url, force_reload, intlang) { 

if ( (navigator. appName == 'Netscape') && 

( (navigator.appversion.indexof C'4.5') != -1) II 
(navigator .appversi on. indexOfC 3.0') != -1) ) ) { 

alertCSorry, currently we do not support Netscape Navigator 3.0, 
4.5, 6.0, Internet Explorer 3.0.\nPlease upgrade your browser.'); 

return; 

} 

if ( (navi gator. appName 'Netscape') && 

( (navigator.appversion.indexof ('4. 5') != -1) || 
(navi gator. appversi on. indexof ('3.0') != -1) ) ) { 

alertCwe are currently not support Netscape Navigator 3.0, 4.5, 
6-0, Internet Explorer 3.0.\nPlease upgrade your browser.'); 

return; 
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} 



spch. js 



if C c„lang != " ) lang = c_lang; 

if C intlang == " ) intlang = int_lang; 

var isMSlE = (navi gator. appName =:= 'Microsoft internet Explorer'); 
var Ver = navi gator. appversi on; 

if ( (isMSIE && parseint (navigator .appversi on) < 4) ) { 

alert ("Our spellchecker feature does not support internet Explorer 
3,0. However, it does support the following browsers: IE 4+, Netscape 4+ ( 6.0)."); 

return; 

} 

//////////////////////////////////////////////////////////////// 

var ctrlobj; 
: -.-var Ctrl Name = ''; 

var formNum = -1; 

var wwidth = 488; 

var wHeight = 440; 

if (Ctrl .constructor && Ctrl . constructor == String) 
{ 

Ctrl Name = Ctrl ; 
formNum = -1; 

ctrlobj = eval(ctrl); 

wwidth = ctrlobj .cli en twidth < wWidth ? wWidth : 
ctrlobj .clientwidth; 

WHeight = (ctrlobj .cli entHeight > wHeight ? ctrlobj .cli entHeight : 

WHeight) ; 

} 

else 
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spch.js 

var i = 0; 

for (i = 0; i < document. forms. length; i++) 
{ 

if (document, forms [i] == Ctrl. form) 
break; 

} 

if (i==document. forms, length) 
formNum = -1; 

else 

formNum = i ; 

Ctrl Name = Ctrl .name; 
Ctrl Ob j = Ctrl ; 

} 

//////////////////////////////////////////////////////////////// 
ii^^ ((Ctrl Ob j .value ? ctrlobj .value : ctrlobj .innerHTML) =="'){ 

alertC Nothing to check.'); 

return 

} 

if ( lang ===*') lang = 'en' ; 

if ( window. name " ) window. name = 'sp_ch_opener_window' ; 
wndname = window .name; 



///++++++4-++BEGIN+++++++++++++++++++++++++++++++++++^ 
var spell Win; 

if (window .bEmbedded && window. bEmbedded == 'true') 
spell Win = window; 

else 

spellwin = window.openC"', "spch" + „ . i. 

qetHostStr(document. location. host), "width=" + wwidth + ",height= + wHeight + 
, tool bar=no , resi zabl e=yes") ; 
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spch. js 



var d = spell win. document ; 
var botf = 150; 

if C (intlang == 'fr') || O'ntlang 'ge') ) botf=157; 
if (intlang 'it') botf =159; 
botf = 159 

var s = ' ' ; 

if (window. bEmbedded) 

{ 

s = 

'<script>* + 

'\n var cFlag = 1; ' + 

'\nfunction uHandler(){ if (cFlag) openC" + url + 
'?cmd=terminate&txt_ctrl=' + Ctrl. name + '");}' + 

'</script>' + 

'<title>Spell checker. net</title>' + 

'<frameset onunload="javascript :uHandler()" , ^ , 

^ows="•+((bn^==l)?96:30) + ^*, '+botf+\0" f rameborder="No" f ramespacing=0 border=0> 

} 

else 
{ 

s = 

' <ti tl e>Spel 1 checke r . net</ti tl e> ' + 

'<frameset rows=" '+((bnr==l)?96: 30)+' '+botf+' ,0" f rameborder="No 
framespacing=0 border=0>' 

} 

s += 

<frame name="top" src="' + service^host + doc_blank + 
marginwidth="2" marginheight="0" noresize scrolling="no" f rameborder="no" 
f ramespacing=0>' + 

<frame name="mid" src="about: blank" marQinwidth="0" 
marginheight="0" noresize scroll ing="auto" f rameborder=:"no" framespacing=0>' + 

<frame name="bot" src="' + service_host + doc_blankform + 
marginwidth=l marginheight=l noresize scroll ing="auto" f rameborder="no" 
framespacing=0>' + 
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spch.js 

<frame name="spensuggestan" src="' + service_host + doc_blank 
+ marginwidth=l marginheight=l noresize scroll ing="no" f rameborder="no" 
f ramespacing=0>* + 

'</f rameset\>' ; 



d.openO ; 
d.write(s) ; 
d.cToseC) ; 

d = spellwin.f names [1] -document; 
if ( d ) { 



var s = 



doc_process + lang=' 



<body>' + 

<form name=frmspell method=post action="' + service_host + 
lang + + 

<input type=hidden name=lang value="">' + 

<input type=hidden name=intlang valuer" ">' + 

<input type=hidden name=text value="">' + 

<input type=hidden name=cmd value="">' + 

<input type=hidden name=trg_url value="">' + 

<input type=hidden name=trg_wnd value="">* + 

<input type^hidden name=txt_ctr1 value="">' + 

<input type=hidden name=svc_time value="">' + 

<input type=hidden name=statinfo value="">' + 

<input type=hidden name=customerid value="">' + 

<input type=hidden name=schema value-" + 

<input type=hidden name=bnr value="">' + 

</form>' + 

<center><hl>Loading. . .</hl><center></center>' + 
</body>* ; 



d.openO ; 
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d.writeln(s) ; 
d.closeC) ; 



spch.js 



van f_dst = d. forms [0]; 
f„dst.cmd. value = 'spelV; 
Ost.lang. value = lang; 
f„dst,intlang. value = intlang; 

f_dst. text. value = ct rl Ob j .value ? ct rl Ob j .value : 
ctrlobj -innerHTML; 

f_dst.trg_url .value = url ; 

f_dst.trg„wnd. value = wndname; 



if (formNum != -1) 

f„dst.txt_ctrl .value = force.reload ? ' document. forms[' + i 
+ "ICX" + ctrlName + '\']' : 

else 

f_dst.txt__ctrl .value = force„reload ? ctrlName : 
/ / END++++++++++++++++++++++++++++++++++++++ 

f_.dst.svc_ti me. value = (new DateO) .getTimeQ ; 
f^dst.customerid. value = customerid?customerid: " ; 
f„dst. schema. value = schema?schema: " ; 
f_dst.bnr. value = bnr; 
f_dst. submit O ; 
spell win.focusQ ; 

} 



function getHostStrCstr) 
{ 

var res = getspli tstr(str , "."); 
res = getSplitStrCres, ":"); 
res = getspli tStrCres, "-"); 
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return res; 



function getsplitstr(str , del) 
{ 

var res = 

var arr = str . split(del) ; 

forCvar i = 0; i < arr, length; i++) 

{ 

if (res != 

res = res +"„"; 
pes = res + arr[i] ; 

m 

m } 

m 

return res; 

i }-.- 

p 

o 

%l 
o 
w 
o 
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utils.js 

function isEmailValidCstr) { 

if (str.indexof C ') != -1) return false; 
var a = str . splitC'®") ; 

if (a. length != 2 M str,charAtCstrJength-l) == '@') return 
if (a[0]. length 0 | | a[l]. length -= 0) return false; 
var b = a[l].splitr."); 
if (b. length < 2) return false; 

if (b[0]. length -= 0 | 1 b[l]. length == 0) return false; 

return true; 

} 

function trim( str ) { 
var end = 0; 

for Ci=str. length; i>0; i--) { 

if Cstr.substring(i-l,i) != ") { 
end = i ; 
break; 
^ } 

return (str , substr(0,end)) ; 
} 
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index. asp 

<%@ Language=VBScript %> 

<HTML> 

<HEAD> 

<title>video Mail Test</title> 

</HEAD> 
<BODY> 



<%if Request. Form. Count <= 0 then%> 
<BR><BR><BR><BR> 

<form name=forml action=index.asp method=post> 
Email Add res : <input name=email><BR> 
subject : <input name=subject><br> 
<input name=sl type=submit value=Submit> 
</form> 

<%else 

b_Mail = true%> 

<!-- #include file="videol,inc" --> 
<!-- #include file="mail .inc" 

Done, Thank You, 

<%end if%> 

</BODY> 
</HTML> 
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mail.inc 

Set JMail = server. CreateObjectC'JMail .SMTPMail") 
■ This is my local SMTP server 

JMail .ServerAddress = "mailhub. registeredsite.cora" 
' This is me 

JMail. Sender = "eyardsigns@eyardsigns.com" 
JMail .subject = request .form("subject") 

JMail .AddRecipient request. formC"emai 1 ") 

JMail -ContentType = "text/html" 
JMail .Body = sBody 

JMail .Priority = 3 
' send it. . . 
JMail .Execute 
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nomail. asp 

<%& Language=VBScript %> 

<!— #include fi1e= videol.inc" — > 

<%Response. write sBody%> 
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videol.inc 

<% 

sSiteURL = "http://www.eyardsigns.com/test/videol.images/" 
sBody = sBody + "<html>" 

sBody = SBody + "<body bgco1or='#FFFFFF" text=' #000000 

if b_Mail = true then . . 

sBody = sBody + "<font face=arial size=2>lf the evardSign below does not 
show up correctly, click here:" 

SBody = SBody + "<a 

h ref =http : //www . eyardsi gns . com/test/nomai 1 . asp>http : //www . eyardsi gns . com/test/nomai 1 

.asp</a><BR>" 

end if 

sBody = sBody + "<table border='0' cell spacing='0' cellpadding='0'>" 
sBody = sBody + " <tr> " 

SBody = SBody + " <td bgcolor='#FFCC66* valign=* top'> " 

SBody = sBody + " <table width='283%' border='0' cellspacing='0' 

cenpadding='0'>" 

SBody = SBody + " <tr> " 

sBody = SBody + " <td width='283'><img src='" + sSiteURL + "logo.gif" 

width='283' height='61'></td>" 
SBody = sBody + " </tr>" 
sBody = SBody + " <tr>" 

SBody = sBody + " <td width='283'> " , n-. ... u 

SBody = sBody + " <table border='0' cellspacing='0' cellpadding= 0 > 

SBody - SBody + " <tr> " ...... 

sBody = SBody + " <td bgcolor='#FFCC66' valign='top'><img src=' + 

sSiteURL + "3.gif' widths '21' height-' 291 '></td>" 

SBody = sBody + " <td valign='top' bgcolor='#FFCC66 > 

SBody = SBody + " <table width=:'201' border- '0' cellspacing='0' 

cellpadding='0'>" 

SBody = sBody + " <tr> " ... 

sBody- =-sBody + " <td height- '75' align- 'center' 

bgcol or-^FFFCF7 ' >&nbsp ; </td>" 

SBody - sBody + " </tr>" 

SBody = SBody + " <tr> " 

sBody - sBody + " <td> " . 

SBody - SBody + " <table width-' 0' border-' 0' cellspacing- 0 

eel 1 paddi ng= ' 0 ' al i gn= ' ri ght ' >" 

SBody = sBody + " <tr> " .... 

sBody - sBody + " <td><img src-'" + sSiteURL + 

"new_3_l.gif' width- '12' height-' 12 '></td>" 

SBody = SBody + " <td><img src-'" + sSiteURL + 

"tv_3_2.gif' width- '172' height-' 12 '></td>" 

SBody - sBody + " <td><img src-'" + sSiteURL + 

"tv„3_3.gif' width- '17' height-' 12 '></td>" 

sBody - SBody + " </tr>" 

sBody - sBody + " <tr> " . ,„ 

SBody - SBody + " <td bgcolor=#000000><img src-' + 

SSiteURL + "tv_3„4.gif' width- '12' height-' 122 '></td>" 

sBody = sBody + " <td height- '122' width- '172' 

bgcolor-' #000000 'xobject width- '170' height- '120' aTign='absmiddle'>" 

sBody = SBody + " <embed width- '170' height- '120' 

align-'absmiddle' src-'" + sSiteURL + "sachin.asx' showcontrols-0>" 

SBody = SBody + " </embed> 

sBody = sBody + " </object></td>" 

sBody = sBody + " <td><img src-'" + sSiteURL + 

"tv_3„6.gif' width- '17' height-' 122' ></td>" 

sBody = SBody + " </tr>" 

SBody - sBody + " <tr> " .... 

sBody - SBody + " <td><img src-'" + sSiteURL + 

"tv_3_7.gif' width- '12' height-' 15 '></td>" 

SBody = SBody + " <td><img src-'" + sSiteURL + 

"tv_3_8.gif' width- '172' height-' 15 '></td>" 

SBody - SBody + " <td><img src-'" + sSiteURL + 
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"tv_3_9.gif' width='17' height='15'></td>" 
sBody = sBody + " </tr>" 
sBody = sBody + " </table>" 
sBody = sBody + " </td>" 
SBody = sBody + " </tr>" 

SBody = sBody + " <tr> " 

sBody = sBody + " <td bgcolor=:'#FFCC66' widths '201' 

align=' center' height^' 67'ximg src='" + sSiteURL + "stamp. gif width='50' 
height='40'></td>" 

sBody = sBody + " </tr>" 
SBody = SBody + " </table>" 
sBody = sBody + " </td>" 

SBody = sBody + " <td a1ign=' right * valign='top . , . „ 

bgcolor='#FFCC66'><img src='" + sSiteURL + "S.gif width='61' height='291'></td> 
sBody = sBody + " </tr>" 
SBody = SBody + " </table>" 
SBody = SBody + " </td>" 
sBody = sBody + " </tr>" 
SBody = sBody + " </table>" 
sBody = SBody + " </td>" 

sBody = sBody + " <td va1ign=*top' bgcolor='#FFCC66'> " . . ... 

SBody = sBody + " <tab1e width='312' border='0' censpacing='0' cellpadding-*0' 

height='100%'>" 

sBody = sBody + " <tr> " ^ 

SBody = sBody + " <td valign='top' bgco1or='#FFCC66'> 

sBody = SBody + " <table width='100%' border='0' cel1spacing='0' 

cenpadding='0">" 

SBody = SBody + " <tr> " . ,„ . 

sBody =: sBody + <td bgcolor=*#FFFFFF'><img src='" + sSiteURL + 

"blank. gif width='l' height='22'></td>" 

sBody =v-s3ody + " </tr>" 

sBody = SBody + " <tr>" 

SBody = sBody + " <td> </td>" 

SBody = sBody + " </tr>" 

SBody = sBody + " <tr> " 

sBody = sBody + " <td height='300' valiQn='niiddle"> " 

sBody = sBody + " <table border=0 celTpadding=0 cellspacing-O 

width='100%'>" 

sBody = sBody + " <tr height=l> , ^ . 

SBody = SBody + " <td bgcolor=#000000 col span=2><img src= + 

SSiteURL + "blank.gif width=l height=l></td>" 

sBody = SBody + " <td bgcolor=#000000><img src=" + sSiteURL + 

"blank.gif width=l height=l></td>" 

sBody = sBody + " <td bqcolor=#000000 colspan=2><img src= + 

SSiteURL 4- "blank.gif width=l height=l></td> ' 
sBody = sBody + " </tr>" 
SBody = sBody + " <tr> " 

sBody = SBody + " <td width=l bQColor=#000000 rowspan=3><img 

src= + SSiteURL + "blank.gif width=l hei ght=l></td> ' ^ ^ 

SBody = SBody + " <td bgcolor=#ffffff width=3 rowspan=:2></td> 

SBody = sBody + " <td bgcolor:=#ffffff align=center 

valign=bottom><font face=Arial Black, Arial size=7 
color=#cccccc><b>Elect</b></font></td>" 

sBody = sBody + " <td bgcolor=#ffffff width=3 rowspan=2></td> 

sBody = sBody + " <td bgcolor=#000000 width=l rowspan=3><img 

src=" + sSiteURL + "blank.gif width=l height=l></td>" 
sBody = SBody + " </tr>" 
sBody = SBody + " <tr> " 

SBody = sBody + " <td bgcolor=#ffffff align=center height='50 

valign='middle'><font face=Arial Black, Arial size=5><b><font size='4' 
color='#CC3300'> " ... 
SBody = sBody + " P. Johnson </font><font face=Anal 

Black, Arial size=5><b></b></font></b></font></td>" 
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sBody = sBody + " </tr>" 
sBody = SBody + " <tr> " 

SBody = SBody + " <td bqcolor=#003399></td>" 

SBody = SBody + " <td align=center bgcolor=#003399 

height='50'><font face=Arial Black, Aria! size=6><b><font color='#FFFFFF' 
si ze= ' 5 ' > J udge</f ontx/bx/f ont></td>" 

SBody = SBody + " <td bgcolor=#003399></td>" 

SBody = SBody + " </tr>" 

SBody = sBody + " <tr height=l> " 

SBody = SBody + " <td bqcolor=#000000 colspan=2><img src=" + 

ssiteURL + "b1ank.gif width=:l height=l></td>'^ 

SBody = SBody + " <td bgcolor=#000000><img src=niages/blank.gif 

width=l height=l></td>" 

SBody = SBody + " <td bgcolor=#000000 colspan=2><img src=" + 

ssiteURL + "blank.gif width=l height=l></td>" 
SBody = sBody + " </tr>" 
sBody = SBody + " <tr> " 

SBody = sBody + " <td colspan=5 valign=top> " 

SBody = SBody + " <table width=:100% border=0 cellpadding=0 

censpacing=:0>" 

SBody = SBody + " <tr> " 

sBody = SBody + " <td align=center width=50% ximg src=" 

+ ssiteURL + "leg.gif width='46' height=' 79'></td>" 

SBody = SBody + <td align=center width=:50% ximg src=" 

+ ssiteURL + "leg.gif width=M6' height=' 79'x/td>" 

SBody = SBody + </tr>" 

SBody = SBody + " </tab1e>*' 

SBody = SBody + " </td>" 

SBody = SBody + " </tr>" 

SBody = SBody + " </table>" 

SBody- =5^sBody + " </td>" 

sBody = SBody + " </tr>" 

SBody = SBody + " </table>" 

SBody = sBody + " </td>" 

sBody = SBody + " <td aliqn=' right' width='24' valign='top* 

bgcolor='#FFCC66'ximg src-'" + sSiteURL + "2_l.gif' width='24' height-' 61 'x/td>" 

SBody = sBody + " </tr>" 

SBody = SBody + " </table>" 

SBody = SBody + " </td>" 

SBody = SBody + " </tr>" 

SBody = SBody + " <tr> " 

SBody = SBody + " <td colspan='2'>" 

sBody = sBody + " <tab1e border=0 cellpadding-O cellspacing-O bgcolor='#FFFFFF' 

width-100% >" 

sBody = SBody + " <tr> " 

SBody = sBody + " <td rowspan=:2 valign=top width='77'ximg src=" + ssiteURL 

+ "bottomleft.gif width=' 77' height-' 30' x/td>" 

SBody = sBody + " <td valign-topximg src='" + ssiteURL + "shadowl.gif 

wi dth= ' 100% ' hei ght- ' 13 ' x/td>" 

SBody = sBody + <td rowspan=2 align-right valiqn=top width='77'ximg 

src=" + ssiteURL + "bottomright.gif width- '77' height-' 30S</td>" 
sBody - sBody + " </tr>" 
SBody = SBody + " <tr> " 

SBody = SBody + " <td valign-top align- 'center' height- '60 'ximg src-" + 

ssiteURL + "buttonsl.gif usemap-#buttons border-O width- '441"^ height-' 61^x/td>" 
SBody = SBody + " </tr>' 
SBody = SBody + " </table>" 
SBody - sBody + " </td>" 
SBody - SBody + " </tr>" 
sBody - sBody + "</table>" 
SBody - SBody + "</body>" 
SBody = sBody + "</html>" 



%> 
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outputFile.asp 

<% 

'on error resume next 

byteCount = Request .Total Bytes 

Request Bin = Request. BinaryRead (byteCount) 
Dim uploadRequest 

Set uploadRequest = createObjectC'scripting. Dictionary") 
Bui 1 dupl oadRequest RequestBi n 

'if not upl oadRequest. Item("fil el") -itemC'Value") = "" then 

'Create FileSytemObject Component 
' set scriptobject = Server, CreateObjectC'scripting. FileSystemObject") 

sKeyname = "filel" 
' contentType = Up! oadRequest. itemCsKeyname) .itemC"ContentType") 

' filepathname = UploadRequest. item(sKeyname) .ltem("FileName ') 

sFi 1 eName ^ Ri qht (f i 1 epathname , Len (f i 1 epathname) -Inst rRev(f i 1 epathname , "\") ) 
' filename = "upload\" + sFil eName 

' value = upl oadRequest. item(sKeyname) ,ltem("value") 

'Create and write to a File 
' sScriptDir = 

St rReverse (Se rve r . mappath (Request . servervari abl es (" PATH„INF0") ) ) 
' SScriptDir = Mid(sScriptDi r, InStr(l, sScriptDir, "\")) 

' SScriptDir = StrReverse(sScriptDi r) + filename 

' sserverfilename = sScriptDir 

Set MyFile = ScriptObject.CreateText File (sScriptDir) 
' .... --Myfile. Write getstring(value) 
' My File. Close 

' sLogo = filename 

'else 

sLogo = UploadRequest. ltem("s_logo") -ltem("Value") 
•end if%> 

< ! --#i ncl ude f i 1 e="upl oad . asp"--> 
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upload. asp 

<% 

Sub BuildUploadRequest(RequestBin) 
'Get the boundary 
PosBeg = 1 

PosEnd = instrB(PosBeg,RequestBin,getBytestring(chr(13))) 
boundary = MidB(RequestBin, PosBeg, PosEnd-PosBeg) 
boundaryPos = instrB(l,RequestBin, boundary) 

'Get all data inside the boundaries . , 

DO until (boundaryPos=instrBCRequestBin, boundary & getByteStringC ))) 

'Members variable of objects are put in a dictionary object 

Dim uploadcontrol 

set uploadcontrol = CreateObject("Scripting. Dictionary ) 
'Get an object name 
Pos = 

inst rB(BoundaryPos , RequestBi n , getByteSt ri ng ("Content-Di sposi ti on") ) 
Pos = lnstrB(Pos, RequestBi n, getByteStri ngC'name=' )) 
PosBeg = Pos+6 

PosEnd = instrB(PosBeg,RequestBin,getByte5tring(chr(34))) 

Name = getstri ngCMidB(RequestBin, PosBeg, PosEnd-PosBeg)) 

PosFile = instrB(BoundaryPos,RequestBin,getByteString("filename= )) 

PosBound = instrB(PosEnd, RequestBi n, boundary) 

'Test if object is of file type 

If PosFileoO AND (PosFile<PosBound) Then 

'Get Filename, content-type and content of file 
PosBeg = PosFile +10 ^ , ^ 

PosEnd = instrB(PosBeg, RequestBi n,getByteStnngCchr (34))) 
FileName = getstri ng(MidB(RequestBin, PosBeg, PosEnd-PosBeg)) 
'Add filename to dictionary object 
uploadcontrol -Add "FileName", FileName 

POS = 

lnstrBCPQ5End , RequestBi n , getByteStri ngC"Content-Type : ")) 

PosBeg = Pos+14 ^ . ^ . ^^^^^^ 

PosEnd = lnstrB(PosBeg,RequestBin,getByteStnng(chr(13))) 
'Add content-type to dictionary object 
ContentType = 
getstri ngCMi dBCRequestBi n , PosBeg , PosEnd-PosBeg)) 

uploadcontrol .Add "ContentType" , ContentType 
'Get content of object 
PosBeg = PosEnd+4 

PosEnd = Inst rB(PosBeg, RequestBi n, boundary) -2 
value = Mi dB(RequestBin, PosBeg, PosEnd-PosBeg) 
Else 

'Get content of object 

POS = lnstrBCPos,RequestBin,getByteString(chr(13))) 
PosBeg = Pos+4 

PosEnd = lnstrB(PosBeg, RequestBi n, boundary) -2 

value = getStringCMidBCRequestBin, PosBeg, PosEnd-PosBeg)) 

End If 

'Add content to dictionary object 
uploadcontrol .Add "value" , Value 

'Add dictionary object to main dictionary 

UploadRequest.Add name, uploadcontrol 

'Loop to next object - . . n 

BoundaryPos=lnstrB(BoundaryPos+LenB(boundary) , RequestBi n, boundary) 

Loop 

End Sub 

'String to byte string conversion 
Function getByteStri ngCstringStr) 
For i = 1 to Len(StnngStr) 

char = Mid(StringStr,i ,1) 
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upload. asp 

getByteString = getByteString & chrB(AscB(char)) 

Next 

End Function 

'Byte string to string conversion 
Function getString(StringBin) 
getstring 

For intcount = 1 to LenB(StringBin) 

getstring = getstring & chrCAscB(MidB(StringBin,intCount,l))) 

Next 
End Function 

%> 
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